Создание программы (write ln,var)+ Паскаль

Question

Создание программы (write ln,var)+ Паскаль. Пмогите, пожалуйстаДаны координаты 2 ух точек (x1; y1) , (x24y2) Найти: расстояние междудвумя точками.

Answer 1

34

heartburner

15 апреля 2023

По теореме пифагора расстояние будет равно корню из 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.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: