Задание:
Создание программы (write ln,var)+ Паскаль. Пмогите, пожалуйстаДаны координаты 2 ух точек (x1; y1) , (x24y2) Найти: расстояние междудвумя точками.
Решение:
По теореме пифагора расстояние будет равно корню из x²+y².s: =sqrt (sqr (x2-x1)+sqr (y2-y1); a вся программаprogram x1; var x1, x2, y1, y2, s: real; begin read (x1, y1, x2, y2); s: =sqrt (sqr (x2-x1)+sqr (y2-y1); writeln (s); end.
Знаете другой ответ?