СРОЧНО!!! ПОЖАЛУЙСТО ПОМОГИТЕ! Я ХОЧУ СПАТЬ!
Считая, что Земля — идеальная сфера с радиусом R = 6350 км, определить расстояние до линии горизонта от точки с высотой над Землей, равной 1, 2, ..., 10 км

const   r=6350; var   h,l: real; begin   write('Введите значение высоты h (км): ');   readln(h);   writeln('До линии горизонта ',sqrt(sqr(r+h)-sqr(r)):0:3,' км');   readln; end.