Помогите, пожалуйста, написать программу в Pascal. Напишите функцию, вычисляющую периметр прямоугольного треугольника, заданного длинами его катетов. Используйте ее в программе, отделяющей больший по периметру треугольник из двух заданных
Program Perimetr; var a,b:integer; begin Write ('Введите первую и второю сторону прямоугольника. '); Readln (a,b); Writeln ('Периметр равен ',2*(a+b)); Readln end.
это же только функция, напишите, пожалуйста, саму программу
Простите? Это программа для вычисления периметра треугольника.
Вы прочитайте дальше:"используйте ее в программе, определяющей больший по периметру треугольник из 2 заданных"