Определите подпрограмму для расчета длины отрезка по координатам его вершин - Free Pascal
Формулировка задачи:
Определите подпрограмму для расчета длины отрезка по координатам его вершин и подпрограмму для подсчета периметра треугольника по длинам сторон. Найдите с помощью разработанных функций периметр треугольника, заданного координатами своих вершин.
Формат входных данных
Входной файл содержит три пары действительных чисел - и координаты вершин треугольника. Координаты по модулю не превосходят 1000.
Формат выходных данных
Выходной файл должен содержать единственное число - ответ на задачу с точностью до 2-х знаков после запятой.
Примеры:
Вход
1 1
1 4
3 1
Выход
8.61
Решение задачи: «Определите подпрограмму для расчета длины отрезка по координатам его вершин»
textual
Листинг программы
function Dlina(x1,y1,x2,y2:real):real; begin Dlina:=sqrt(sqr(x1-x2)+sqr(y1-y2)) end;
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д