Составить программу вычисления периметра и площади - вопрос №681358 от dndzanton 24.04.2020 21:31

Question

Другие предметы: Составить программу вычисления периметра и площади прямоугольника

dndzanton · Answer

Program z1;
Var a, b, p, s: real;
Begin
     Writeln(‘b’);
      Readln (a, b);
      P:= 2*(a+b);
      S:=a*b;
      Writeln (p, s);
      Readln;
      End.