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