КУМИР
7. Составьте программу закрашивания указанных клеток с использованием цикла для. Начальное положение Робота отмечено символом ◊.

На каком языке ? также вывод с клавиатуры или нажатие мышки ?

var

i: integer;

begin

for i: =100 to 999 do

if ((i+1) mod 2=0) and ((i+2) mod 3 =0) and ((i+3) mod 4=0) and ((i+4) mod 5 =0)

then writeln(i);

end.

ну вроде "алгоритм" переходит в "терминал", хотя по буквам не получается - только последние 5 нормально встают и то, если в алфавите нет ё и й