Найти все элементы массива (любого) , кратные 3 или 5. Вывести на экран их общее количество

Question

a.butaev Знаток (353), на голосовании 11 лет назад

помогите пожалуйста написать программу на Turbo Pascal

Answer 1

count:=0; for k:=1 to N do if (mass[k] mod 3 = 0) or (mass[k] mod 5 = 0) then inc(count);