program valik;
var x:real;
begin
 writeln('Kirjuta ks arv!');
 readln(x);
 if x<0 then 
    writeln('Sellest arvust ei saa ruutjuurt v“tta!')
 else 
    writeln('Selle arvu ruutjuur on ', sqrt(x):6:2);
end.