Задание

Расположите строки так, чтобы получилась программа нахождения площади прямоугольника произвольных размеров:

Program square;

Var Dlina,Shirina,S:real;

Begin

Readln (Dlina);

Readln (Shirina);

S:=Dlina*Shirina;

Writeln ('Площадь прямоугольника paвнa ',S);

End.