[Pascal034]Определите функцию f без параметров…

Определите функцию f без параметров, в теле которой вводятся ненулевые целые числа, до тех пор пока не введется 0. Значением функции является число перемен знаков у членов введенной последовательности (например, в последовательности 1, -34, 8, 14, -5 знак меняется 3 раза)…

[И-033] Дано натуральное n>0…

Дано натуральное n>0. Найти произведение первых n простых чисел. Определите функцию, позволяющую распознавать простые числа…

[И-032] Найти все натуральные числа…

Найти все натуральные числа, не превосходящие заданного N  и равные сумме кубов своих цифр.

[И-031] Напечатать все трехзначные десятичные…

Напечатать все трехзначные десятичные числа, сумма цифр которых равна данному числу.

[И-030] Не используя стандартные функции…

Не используя стандартные функции (за исключением abs), вычислить с точностью eps>0  Считать, что требуемая точность достигнута, если очередное слагаемое по модулю меньше eps, — все последующие слагаемые можно уже не учитывать.

[И-029] Даны целое n>0 и последовательность…

Даны целое n>0 и последовательность из n вещественных чисел, среди которых есть хотя бы одно отрицательное число. Найти величину наибольшего среди отрицательных чисел последовательности.

[И-028] Найти сумму цифр заданного…

Найти сумму цифр заданного натурального числа.

[И-027] Даны целое n>0 и последовательность…

Даны целое n>0  и последовательность из n вещественных чисел. Вычислить разность между максимальным и минимальным из них.

[И-026] Дано натуральное число n. Выяснить…

Дано натуральное число n. Выяснить, имеются ли среди n, n+1,…,2n близнецы, то есть, простые числа, разность между которыми равна двум.

[И-025] Даны целое n>2 и вещественные числа a1, b1,…

Даны целое n>2 и вещественные числа a1, b1,…,an, bn  (a1<b1). Рассматривая пары a1 и b1 как левые и правые концы отрезков на одной и той же прямой, определить концы отрезка, являющегося пересечением всех этих отрезков. Если такого отрезка нет, сообщить об этом.