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

Question

Информатика

Ерофей

27 октября, 23:46

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

+3

Ответы (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.