Дана сторона квадрата a. Найти его площадь
Категория: Delphi/Pascal
2011-11-13 18:00:44
code: #pascal
Program Begin2; Var a:Real; Begin ReadLn(a); WriteLn('P = ',Sqr(a):6:3); ReadLn; End.
автор: Sklyarov Sergej a.k.a. S9
Поделиться:
Program Begin2; Var a:Real; Begin ReadLn(a); WriteLn('P = ',Sqr(a):6:3); ReadLn; End.
автор: Sklyarov Sergej a.k.a. S9