Program NoName; 
const a=9.8;
Var 
   h,V0:integer;
   t:Real;
Begin 
  writeln('введіть висоту'); 
  Readln(h); 
  writeln('введіть початкову швидкість'); 
  Readln(V0); 
  t:=sqrt(2*h/a);
  Writeln('час падіння тіла рівний ',t:2:0,' с'); 
end.