Кир 27 ноября 2019 в 12:14
Дан массив натуральных чисел a1, a2, ....,an. Найдите количество элементов массива, кратные 3 и не кратные 5
Новая переменная k
For I:= 1 to an do if
A[i]mod 3 = 0 then k:=k+1;
A[i]mod 5 lt;gt;0 then k:=k+1;
Для комментирования необходимо зарегистрироваться на сайте