Форум » Обработка целых чисел » 17, Почему код пропускает число? » Ответить
17, Почему код пропускает число?
ростик: (№ 2291) Рассматривается множество целых чисел, принадлежащих отрезку [1033; 7737], которые делятся на 5 и не делятся на 11, 17, 19 и 23. Найдите количество таких чисел и максимальное из них. Мой код: [pre2] var i,count,max: integer; begin for i:=1033 to 7737 do begin if i mod 5 = 0 then begin if (i mod 11 <> 0) and (i mod 17 <> 0) and (i mod 19 <> 0) and (i mod 23 <> 0) then count+=1; if i > max then max:=i; end; end; println(count,max); end. [/pre2] Консоль выдает 7735, но это число делится на 17. Почему пропускает?
Ответов - 2
Поляков: В отличие от Питона, отступы не выделяют блок. Вы забыли begin-end.
ростик: Увидел, спасибо!
полная версия страницы