- •Задачник Pascal Taskbook Линейные алгоритмы
- •Логические выражения
- •Условные операторы
- •Оператор выбора
- •Операторы цикла
- •Обработка последовательностей
- •Минимумы и максимумы
- •Одномерные массивы
- •Двумерные массивы (матрицы)
- •Символы и строки
- •Обработка числовых данных
- •Массивы
- •Простейшие рекурсивные алгоритмы
- •Разбор выражений
- •Деревья
- •Двоичные файлы
- •Текстовые файлы
Операторы цикла
Begin80.Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (включая сами эти числа), в порядке их возрастания, а также количество N этих чисел.
Begin81.Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (не включая сами эти числа), в порядке их убывания, а также количество N этих чисел.
Begin82.Дано вещественное число A и целое число N (> 0). Вывести A в степени N: AN= A·A·...·A (числа A перемножаются N раз).
Begin83.Дано вещественное число A и целое число N (> 0). Вывести все целые степени числа A от 1 до N.
Begin84.Дано вещественное число A и целое число N (> 0). Вывести
1 + A + A2 + A3 + ... + AN.
Begin85.Дано вещественное число A и целое число N (> 0). Вывести
1 – A + A2 – A3 + ... + (–1)NAN.
Begin86.Дано целое число N (> 1). Вывести наименьшее целое K, при котором выполняется неравенство 3K> N, и само значение 3K.
Begin87.Дано целое число N (> 1). Вывести наибольшее целое K, при котором выполняется неравенство 3K< N, и само значение 3K.
Begin88.Дано вещественное число A (> 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 + ... + 1/N будет больше A, и саму эту сумму.
Begin89.Дано вещественное число A (> 1). Вывести наибольшее из целых чисел N, для которых сумма 1 + 1/2 + ... + 1/N будет меньше A, и саму эту сумму.
Begin90.Дано целое число N (> 0). Вывести произведение 1·2·...·N. Чтобы избежать целочисленного переполнения, вычислять это произведение с помощью вещественной переменной и выводить его как вещественное число.
Begin91.Дано целое число N (> 0). Если N — нечетное, то вывести произведение 1·3·...·N; если N — четное, то вывести произведение 2·4·...·N. Чтобы избежать целочисленного переполнения, вычислять это произведение с помощью вещественной переменной и выводить его как вещественное число.
Begin92.Дано целое число N (> 0). Вывести сумму
2 + 1/(2!) + 1/(3!) + ... + 1/(N!) (выражение N! — "N факториал" — обозначает произведение всех целых чисел от 1 до N: N! = 1·2·...·N). Полученное число является приближенным значением константы e= exp(1) (= 2.71828183...).
Begin93.Дано вещественное число X и целое число N (> 0). Вывести
1 + X + X2/2! + ... + XN/N! (N! = 1·2·...·N). Полученное число является приближенным значением функции exp в точке X.
Begin94.Дано вещественное число X и целое число N (> 0). Вывести
X – X3/3! + X5/5! – ... + (–1)NX2N+1/(2N+1)! (N! = 1·2·...·N). Полученное число является приближенным значением функции sin в точке X.
Begin95.Дано вещественное число X и целое число N (> 0). Вывести
1 – X2/2! + X4/4! – ... + (–1)NX2N/(2N)! (N! = 1·2·...·N). Полученное число является приближенным значением функции cos в точке X.
Begin96.Дано вещественное число X (|X| < 1) и целое число N (> 0). Вывести
X – X2/2 + X3/3 – ... + (–1)N–1XN/N. Полученное число является приближенным значением функции ln в точке 1+X.
Begin97.Дано вещественное число X (|X| < 1) и целое число N (> 0). Вывести
X – X3/3 + X5/5 – ... + (–1)NX2N+1/(2N+1). Полученное число является приближенным значением функции arctg в точке X.
Begin98.Дано целое число N (> 2) и две вещественные точки на числовой оси: A, B (A < B). Отрезок [A, B] разбит на равные отрезки длины H с концами в N точках вида A, A + H, A + 2H, A + 3H, ..., B. Вывести значение H и набор из N точек, образующий разбиение отрезка [A, B].
Begin99.Дано целое число N (> 2) и две вещественные точки на числовой оси: A, B (A < B). Функция F(X) задана формулой F(X) = 1 – sin(X). Вывести значения функции F в N равноотстоящих точках, образующих разбиение отрезка [A, B]: F(A), F(A + H), F(A + 2H), ..., F(B).
Begin100.Дано число D (> 0). Последовательность чисел ANопределяется следующим образом:
A1= 2, AN= 2 + 1/AN–1, N = 2, 3, ... Найти первый из номеров K, для которых выполняется условие |AK– AK–1| < D, и вывести этот номер, а также числа AK–1и AK.
Begin101.Дано число D (> 0). Последовательность чисел ANопределяется следующим образом:
A1= 1, A2= 2, AN= (AN–2+ AN–1)/2, N = 3, 4, ... Найти первый из номеров K, для которых выполняется условие |AKAK–1| < D, и вывести этот номер, а также числа AK–1и AK.
![]()
