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;
Помогите пожалуйста!!!! Заранее спасибо!!

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