Составить программу в Pascal для задачи: Прямоугольный участок земли имеет периметр Р метров. Известно, что длина на 20м больше ширины. Найдите площадь участка. ВЫБЕРУ ЛУЧШИЙ
Answers & Comments
leon123
Var P,L,W,S:Real; Begin Read(P); W:=P/2; L:=P+20; S:=L*W; Writeln('S = ',S:0:0); end.
Answers & Comments
Begin
Read(P);
W:=P/2;
L:=P+20;
S:=L*W;
Writeln('S = ',S:0:0);
end.