Рассчитать скорость полёта тела с башни,высота башни вводиться с клавиатуры

Если тело просто падает то так:
const   g = 9.81;  
var   v, n: real;  
begin   write('Введите высоту башни n: ');  
readln(n);  
v := sqrt(2 * g * n);  
writeln;  
write('Скорость тела: ', v:0:2, ' м/с') end.