Составить программу вычисления периметра и площади - вопрос №680790 от Sem0001 11.08.2021 04:12

Question

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

Sem0001 · 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.