Pascal написать программу используя циклические алгоритмы:
Даны натуральное число m и целые числа d1, d2, ..., dm. Выяснить, верно ли, что
количество положительных чисел di кратно трем.