program Project16;
{$APPTYPE CONSOLE}
const P1=3.14;
var S:real;R:integer;
begin
R:=1;
writeln('Radius | Ploscha');
writeln('----------------');
while R<=18 do begin
S:=Pi*sqr(R);
if R<10 then
Writeln(R,'      |',S:5:2);
if R>9 then
Writeln(R,'     |',S:5:2);
R:=R+2;end;
readln;
end.