Вопрос 12:
/*
*/
N=1e6
say 2
do i=3 to N
if s.i <> 1
then do;say i;j=i
do (N/i)%2; j=j+2*i
s.j=1;end;end;i=i+1;end
Акростихи слышали, наверное, все. Акропроза была в прошлом вопросе. А
для решения какой задачи предназначена программа, приведенная на
раздаточном материале?
Ответ: Поиск простых чисел, не превышающих 1.000.000.
Зачёт: По словам "простые числа" без неверных уточнений.
Программа иллюстрирует единство формы и содержания: количество символов
в каждой строке программы равно очередному простому числу. Программа
написана на языке ReXX.
Источник(и): Личный опыт автора вопроса, идея из книги В.Ф. Очкова и Ю.В. Пухначева
"128 советов начинающему программисту" (М.: Энергоатомиздат, 1991).
Автор: Эраст Куненков (Узловая — Москва)