Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Считая, что Земля - идеальная сфера с радиусом R=6350 км, определить расстояние до линии горизонта от точки с заданной высотой над Землей

Ответ оставил Гость

Const R = 6350;var h,s,d:real;beginwrite(Введите высоту h в метрах);Readln(h);s:=sqrt(sqr(h/1000+R)-sqr(R));write(расстояние до линии горизонта,s:9:2, km);end.