Pavel1241
Я тоже умею скопировать текст с других ответов.
srzontmp
Это называется решение задачи. Всего 33 числа, которые делятся на 2,3,4 и не делятся на 5. Или, может быть, Вы что - то другое хотели получить?
srzontmp
Если умеете копировать (в чем я очень сомневаюсь), то зачем задаете вопрос?
Pavel1241
Ладно, извините. Просто мы ещё так не оформляли.
Answers & Comments
begin
n:=24; k:=0;
repeat
if (n mod 5)<>0 then inc(k);
n:=n+24;
until n>1000;
writeln(k);
end.
33