1) Что вычисляет фрагмент программы? S:=0; For I:=1 to 16 do If f[i] mod 3 <> 0 then...

Question

1) Что вычисляет фрагмент программы?
S:=0;
For I:=1 to 16 do
If f[i] mod 3 <> 0 then s:=+m[i];
2) Что вычисляет фрагмент программы?
K:=0;
For I:=1 to 40 do
If I mod 2=0 then k:=k+1;
Помогите пожалуйста!!!! Заранее спасибо!!

Answer 1

1)
Цикл for 16 раз выполняет действие:
Если текущий элемент массива f[i] не кратно трем, тогда к переменной S, прибавляется элемент текущей позиции массива m[i].

2)
Вычисляет количество чисел от 1 до 40 кратных двум.