// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!
1. Современное решение
begin
Writeln('Время падения камня, c: ',Sqrt(2*ReadReal('h=')/9.8):0:1)
end.
2. Обычно в школе решают так
var
t,h:real;
begin
Write('h='); Read(h);
t:=Sqrt(2*h/9.8);
Writeln('Время падения камня, c: ',t:0:1)
end.
Пример
h=35
Время падения камня, c: 2.7