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

Question

Информатика

Петряй

11 ноября, 17:25

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

+3

Ответы (1)

Знаете ответ на вопрос?

Серафим · Answer 1

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.