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

var
a, b, S, P: real;

begin
writeln('Введите стороны прямоугольника:');
{ Вводим размеры прямоугольника: }
readln(a, b);
S := a * b; { <-- Вычисляем площадь }
P := 2 * (a + b); { <-- Вычисляем периметр }
writeln('Результат:');
writeln('S = ', S:0:2);
writeln('P = ', P:0:2);
readln
end.