Задание 
   Расположите строки так, чтобы получилась программа нахождения площади прямоугольника произвольных размеров:
- Program square;
- Var Dlina,Shirina,S:real;
- Begin
- Readln \(Dlina\);
- Readln \(Shirina\);
- S:=Dlina*Shirina;
- Writeln \('Площадь прямоугольника paвнa ',S\);
- End.