Begin3. Даны стороны прямоугольника a и b. Найти его площадь S=a·b и периметр P=2·(a+b).
var a, b, s, p: real;
begin
  write('Введите длины двух сторон прямоугольника ->');
  readln(a, b);
  s:=a*b;
  p:=2*(a+b);
  writeln('Площадь прямоугольника = ', s:6:2);
  writeln('Периметр прямоугольника = ', p:6:2);
end.