Напишите на языке паскаль (турбо-паскаль) как вычислить площадь и периметр прямоугольника.

Предыдущий
вопрос Следующий
вопрос

program Rectangle;

var
width, height, area, perimeter: real;

begin
write('Enter the width of the rectangle: ');
readln(width);

write('Enter the height of the rectangle: ');
readln(height);

area := width height;
perimeter := 2 (width + height);

writeln('The area of the rectangle is: ', area:0:2);
writeln('The perimeter of the rectangle is: ', perimeter:0:2);

end.