Question

напишите программу для решения задачи вычислить периметр и площадь прямоугольного треугольника по длинам a и b двух катетов в Pascal

Answer 1

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 var (a, b) := ReadReal2('Введите длины катетов:');

 Println('Площадь равна', a * b / 2, 'периметр равен', a + b + Sqrt(a * a + b * b))

end.