Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Program n_1;var a, b, c, P: real;beginwrite(Введите число 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.