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

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

  • Program square;
  • Var Dlina,Shirina,S:real;
  • Begin
  • Readln \(Dlina\);
  • Readln \(Shirina\);
  • S:=Dlina*Shirina;
  • Writeln \('Площадь прямоугольника paвнa ',S\);
  • End.