Язык Pascal. Ввести х целых чисел. Найти количество чисел, которые кратны трем(делятся на 3).
Программа на паскале внизу
{ввод массива z} ... for i:=1 to x do if z[i] mod 3 = 0 then k:=k+1; ... вывод k
Думаю, здесь массив совсем не нужен