Ввести с клавиатуры координаты двух точек (а и в) на плоскости (вещественный числа). вычислить длину отрезка АВ. программу нужно написать в паскале

Вам нужно узнать решение и ответ на вопрос Ввести с клавиатуры координаты двух точек (а и в) на плоскости (вещественный числа). вычислить длину отрезка АВ. программу нужно написать в паскале и правильно выполнить домашнюю работу по предмету Информатика? Готовое решение смотрите далее.

Ввести с клавиатуры координаты двух точек (а и в) на плоскости (вещественный числа). вычислить длину отрезка АВ. программу нужно написать в паскале

Uses crt;
var xA,xB,yA,yB,D: real;Begin
clrscr;
write('Введите координаты точки A через пробел: ');
readln(xA,yA);
write('Введите координаты точки B через пробел: ');
readln(xB,yB); d:=sqrt(sqr(xA-xB)+sqr(yA-yB));
writeln;
writeln('Длина отрезака AB = ',d:0:3)
End.

Program n1;
var x1,x2,y1,y2: real;
begin
write('координаты точки A: ');
readln(x1,y1);
write('координаты точки B: ');
readln(x2,y2);
write('|AB|=',sqrt(sqr(x2-x1)+sqr(y2-y1)));
end.

Подобные ответы

Помогите кто разбирается
Помогите кто разбирается
Помогите пожалуйста!!!Нужно придумать алгоритм обмена значениями без использования 3 вспомогательной переменной
Помогите пожалуйста!!!Нужно придумать алгоритм обмена значениями без использования 3