Question

Дан массив натуральных чисел a1, a2, ....,an. Найдите количество элементов массива, кратные 3 и не кратные 5

Answer 1

Новая переменная k For I:= 1 to an do if A[i]mod 3 = 0 then k:=k+1; A[i]mod 5 <>0 then k:=k+1;

Answer 2

Можете полностью написать? Как в паскале программу вводите