1.Написать программу нахождения произевдения всех однозначных чисел не кратных 5. 2....

Question

1.Написать программу нахождения произевдения всех однозначных чисел не кратных 5.
2. Найти кол-во элементов кратных 7,но не кратных 14
3. Найти минимальный двузначный элемент массива

Answer 1

1) 
P:=1;
for i:=1 to 9 do
    if i<>5 then P:=P*i;

2) m:=0;
    for i:=1 to N do
      if (i mod 7 = 0) and (i mod 14 <>0) then
       m:=m+1;
 
3) Какой массив задан????