Друзья
Добавляя друзей через их профиль или через поиск, вы сможете легко общаться и отслеживать их присутствие на сайте.
leinkor
Добавил тему Ошибка 46 в алго
Написал код и пишет ошибку 46 в чем ошибка Program NoName; Var AB,x1,x2,y1,y2:integer; Begin Write('x1='); Readln(x1); Writeln('x2='); Readln(x2); Writeln('y1='); Readln(y1); Writeln('y2='); Readln(y2); AB:=sqrt((x2-x1)*(x2-x1)+(y2-y1)*(y2-y1));
2