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

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

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

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.

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

Даны два числа. Если оба числа положительные, то найти их сумму, иначе вывести сообщение «условие не выполняется».
Даны два числа. Если оба числа положительные, то найти их сумму, иначе вывести сообщение условие не
Помогите с решением этой проблемы!!!
Помогите с решением этой проблемы!!!
выбери тип текста которые предпочтительнее всего разместить в колонках
выбери тип текста которые предпочтительнее всего разместить в
x:=5 y:=7 t:=x x:= y mod x y:=t
x5 y7 tx x y mod x yt