DTTRON PASCAL

var r:longint;
    s:real;

begin
    assign(input,'dttron.inp');reset(input);
    assign(output,'dttron.out');rewrite(output);
    read(r);
    s:=3.14*r*r;
    write(s:0:2);    
end.