Question

Определи расстояние на плоскости между двумя точками с заданными координатами M1(x1,y1)и M2(x2,y2) . Ответ введи целым числом. Если координаты точек: x1=1;y1=5x2=9;y2=12 . Ответ округли до целых. Ответ: d=
СРОЧНО

Answer 1

var x1,y1,x2,y2:integer;

BEGIN

writeln('Координаты первой точки:');

readln(x1,y1);

writeln('Координаты вторвой точки:');

readln(x2,y2);

writeln('Расстояние между точками = ',trunc(sqrt(sqr(x2-x1)+sqr(y2-y1))));

end.