Дан массив целых чисел из 12 элементов. найти количество - вопрос №313006012 от skydux 21.01.2020 02:32

Question

Информатика: Дан массив целых чисел из 12 элементов. найти количество элементов массива являющихся кратными трем и пяти.

skydux · Answer

Ввести массив
проверяет условие и выводит количество чисел:
for i:=1 to 12 do
k=0;
if (A[i] mod 5=0) and (A[i] mod 3=0) then k=k+1;
writeln(k); end.