Ответ:

program lala;

var:h,g,t:real;

begin

writeln(‘vvedite vusotu i uskorenie’);

readln(h,g);

t:=sqrt((2h)/g);

writeln(‘vremy padenia’);

readln(t);

end.