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)); Writeln('AB=',AB); end