Ответ:

Периметр прямоугольника вычисляется по формуле P = 2 × (длина + ширина), площадь — по формуле S = длина × ширина.

program Hello;
var
  length, width, p, s: real;
begin
  readln(length, width);
  p := 2 * (length + width);
  s := length * width;
  writeln('Периметр = ', p:0:2);
  writeln('Площадь = ', s:0:2);
end.