program Zadacha7; {$APPTYPE CONSOLE} var R:integer;st:real; begin writeln('Vvedit radius'); readln(R); St:=sqrt(2*sqr(R)); writeln(St:0:2); readln; end.