Question

Составить программу в Pascal для задачи: Прямоугольный участок земли имеет периметр Р метров. Известно, что длина на 20м больше ширины. Найдите площадь участка.
ВЫБЕРУ ЛУЧШИЙ

Answer 1

Var P,L,W,S:Real;
Begin
 Read(P);
 W:=P/2;
 L:=P+20;
 S:=L*W;
 Writeln('S = ',S:0:0);
end.