<span>const
r=6350;
var
h,l: real;
begin
write('Введите значение высоты h (км): ');
readln(h);
writeln('До линии горизонта ',sqrt(sqr(r+h)-sqr(r)):0:3,' км');
readln;
end<span>.</span></span>
Паскаль "не умеет" читать числа напрямую. В случае "текстового ввода" он читает всё вводимое, как последовательность символов, которую затем анализирует и преобразует в соответствии со списком переменных в операторе ввода и их типом.
Завершается текстовый ввод в Паскале всегда нажатием клавиши Enter, посылающей последовательность символов с десятичными кодами 13 и 10 (CR - "возврат каретки" и LF- "перевод строки"), либо считыванием этих кодов из файла.
"Команда" Realln (на самом деле это не команда, а процедура) считывает и удаляет последовательность символов с кодами 13, 10, а Read - оставляет эти коды не считанными. Если после Read будет еще один оператор ввода, читающий СИМВОЛЬНЫЕ данные (string, char), то оставшиеся необработанными после предыдущего Read символы с кодами 13,10 будут восприняты, как вводимые, что неверно.
<u>Как итог: </u>только в случае, когда есть ввод символьных данных и эти данные вводятся не в единственном операторе ввода, перед вводом таких данных нужно указывать Readln. В прочих случаях разницы нет.
Я так понимаю это паскаль?
это инициализация случайных чисел, пишется в начале программы
чтобы создать случайное число нужно написать random(10) это от 0 до 10 числа можно менять, например a:=random(5..15); а- это переменная
2*2-(1)
2*2-(1)=3
<span>3*3-(2)=7 </span>
<span>7*4-(3)=25 </span>
<span>25*5-(4)=121 </span>
<span>121*6-(5)=721 </span><span>
както так)))</span>
2)введите номер месяца: 12
введите день: 3
до Нового года осталось: 28 дней