Question

Ввести с клавиатуры координаты двух точек а и в на плоскости вещественный числа вычислить длину.программу нужно написать в паскале пример,как должно получиться введите координаты точки а 5.5 3.5 введите координаты точки b 1.5 2 длинна отрезка ab=4.272

Answer 1

Var
x1,x2,y1,y2:real;
begin
writeln('Введите координаты первой точки(х1,у1)');
readln(x1,y1);
writeln('Введите координаты второй точки(х2,у2)');
readln(x2,y2);
writeln(sqrt(sqr(x2-x1)+sqr(y2-y1)):3:3);
end.