    !
  .    .
,    ,     .
,   =(3.14)*  .
,   !    ,    .   ! 
..       ,  .  , ,  - .   ";".
!

.    . :  ,  .  =2**(3.14).  !
[URL]

Program Plos; Var A,B:Integer; P:real; Begin Writeln(' '); Readln(A); P:=3.14*A*A; Writeln('=',P:3:2); End.