Создать Паскаль программу, которая должна выдать вычисления от 1 до 5, вычислить гипотенузу по катетам, вычислить периметр треугольника, только письменный вариант

Question

Информатика

Жора

11 марта, 18:17

Создать Паскаль программу, которая должна выдать вычисления от 1 до 5, вычислить гипотенузу по катетам, вычислить периметр треугольника, только письменный вариант

+1

Ответы (1)

Знаешь ответ?

Ионична · Answer 1

Program n_1; var a, b, c, P: real; begin write ('Введите число a'); readln (a); write ('Введите число b); readln (b); c: = Sqrt (Sqr (a) + Sqr (b)); P: = a+b+c; writeln ('c = ', c); writeln ('P = ', P); readln; end.