Определить количество чисел кратных 4, но не кратных - вопрос №13473791461 от alyamiller1513 10.07.2020 01:20

Question

Информатика: Определить количество чисел кратных 4, но не кратных 6 в промежутке от 1 до n.

alyamiller1513 · Answer

begin Arr(1..ReadInteger( n: )).Count(x- (x mod 4=0) and (x mod 6 0)).Printend.Пример работы:...