Иллюстрированный самоучитель по Mathematica 5

Поиск отрезков натурального ряда, состоящих только из составных чисел

За одним-единственным исключением p_n =2, р₂ = 3, числа р_n и р_n+1 не являются смежными в натуральном ряду. Еще Евклид знал, что существуют сколь угодно длинные отрезки натурального ряда, целиком состоящие из составных чисел. Как же найти отрезок натурального ряда, целиком состоящий из составных чисел? Для этого полезно определить следующую функцию.

Вот как ее можно использовать.

Здесь она запускается 10 раз. Вот что получится (вывод немного отформатирован).

Как видите, она находит отрезок натурального ряда заданной длины, целиком состоящий из составных чисел. С ее помощью легко найти и отрезок длиной 150, целиком состоящий из составных чисел.