Программка расчета начала снижения

Когда-то сын учил (проходил) паскаль на информатике, ввиде практического задания сляпали расчитывалки. Есть метровая и футовая. Вводите высоту, скорость и вертикальную. После каждого — жмете ентер. В конце то-же. Термины может и не совсем правильные, но понятные.