Разработайте программу, запрашивающую высоту дома h (в метрах), ускорение свободного падения g и вычесляющую время падения кирпича t (в секундах) с крыши этого дома по формуле: t= в корне 2h/g

Var h,g,t:real;
begin
g:=10;
write('Высота дома равна ');
read(h);
t:=sqrt(2*h/g);
write('Время падения кирпича равна ',t:4:3);//4- общее кол-во знаков, 3- общее кол-во знаков после запятой
end.