Информатика, опубликовано 2018-08-22 19:54:34 by Гость

Составить программу, которая запрашивает координаты двух точек, а выводит длину отрезка, концами которого эти точки являются, и координаты середины этого отрезка. (Блок систему и на языке паскаль)

Ответ оставил Гость

Program Programma;
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;
write(Длина отрезака AB = ,d:0:3)
End.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.