Обчислити периметр і площу прямокутного трукутника за катетами. в pascalabc.net

142

398

Посмотреть ответы 2

Ответы на вопрос:

Касандра0077

Информатика

4,4(15 оценок)

Var a, b, c, p, s : real; begin write('введите первый катет: '); readln(a); write('введите второй катет: '); readln(b); s : = (a * b) / 2; writeln('площадь треугольника = ', s: 2: 2); c : = sqrt(sqr(a)+sqr(b)); p : = a + b + c; writeln('периметр треугольника = ', p: 2: 2); end.