ПОМОГИТЕ, ПОЖАЛУЙСТА!! Очень срочно надо! Сколько натуральных чисел, меньших 1000,...

Question

ПОМОГИТЕ, ПОЖАЛУЙСТА!! Очень срочно надо!
Сколько натуральных чисел, меньших 1000, которые делятся и на 2, и на 3, и на 4, но не делятся на 5?

Answer 1

Var n,k: integer;
begin
  n:=24; k:=0;
  repeat
    if (n mod 5)<>0 then inc(k);
    n:=n+24;
  until n>1000;
  writeln(k);
end.

33

Comments

И что это?

---

Я тоже умею скопировать текст с других ответов.

---

Это называется решение задачи. Всего 33 числа, которые делятся на 2,3,4 и не делятся на 5. Или, может быть, Вы что - то другое хотели получить?

---

Если умеете копировать (в чем я очень сомневаюсь), то зачем задаете вопрос?

---

Ладно, извините. Просто мы ещё так не оформляли.