Pascal написать программу, для подсчета площади и периметра прямоугольника, если заданы стороны прямоугольника ( сделайте готовое, я не могу понять что как куда вставлять)

var

 a, b, s, p: real;

begin

 writeln('Введите длину прямоугольника:');

 read(a);

 writeln('Введите ширину прямоугольника:');

 read(b);

 s := a * b;

 p := 2 * (a + b);

 writeln('Площадь прямоугольника = ', p, #10, 'Периметр прямоугольника = ', s);

end.