Даны стороны прямоугольника a и b. Найти его площадь S = a*b и периметр P = 2*(a+b)

Категория: Delphi/Pascal
2011-11-13 18:02:21
code: #pascal
Program Begin3;
Var
a,b,S,P:Real;
Begin
ReadLn(a,b);
WriteLn('S = ',a*b:6:3);
WriteLn('P = ',2*(a+b):6:3);
ReadLn;
End.

автор: Sklyarov Sergej a.k.a. S9

Поделиться:

Похожие статьи:

теги: периметр, площадь, прямоугольник, консольное приложение, студенты, стороны прямоугольника