Даны стороны прямоугольника a и b. Найти его площадь S = a*b и периметр P = 2*(a+b) — Pascal(Паскаль)

Program Begin3;

Var
  a, b, S, P: Real;

Begin
  ReadLn(a, b);
  WriteLn('S = ', a * b:6:3);
  WriteLn('P = ', 2 * (a + b):6:3);
  ReadLn;

End.

Leave a Comment

5 + 1 =