Считая, что земля - идеальная сфера с радиусом 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.

пользоветель-это система их бывает много есле создать.

програмист-это человек который создает программу 

Надо посчитать количество символов в сообщении: 3 * 25 * 60 = 4500;   сообщение занимает 1125 байт, посчитаем, сколько байт занимает каждый символ: 1125 / 4500 = 0.25;   т.к. символ занимает 0.25 байт, одним байтом можно закодировать 4 символа. байт состоит из 8 бит.  8 / 4 = 2 (количество битов чтобы закодировать каждый символ)  двумя битами можно закодировать 4 символа, значит в алфавите может быть до четырех символов