ПОМОГИТЕ ПОЖАЛУЙСТА!!!
1)Дан массив М : 15, 17, 24, 18, 13, 28, 18, 95, 19, 17
Что появиться на экране после выполнения фрагмента программы:
z:=0;
for k:=1 to 10 do if m[k] mod 2 <>0 then z:=z+1;
writeln(z);
2)Дан массив М : 24, 7, 14, 8, 56, 12, 48, 25, 19, 17
Что появиться на экране после выполнения фрагмента программы:
s:=m[1];
for k:=2 to 10 do if m[k]>s then s:=m[k];
writeln(s);

1) z = 0считаем количество нечётных элементов массива15  (нечётное)   z = 117  (нечётное)   z = 224     (чётное)   z = 218      (чётное)   z = 213  (нечётное)   z = 328     (чётное)   z = 318      (чётное)   z = 395 (нечётное)   z = 419  (нечётное)   z = 517  (нечётное)   z = 6Ответ: 62) s = 24 (первому элементу массива)сравниваем со следующими элементами массива, если элемент больше s присваиваем s значение большего элемента7 > 24 (нет)14 > 24 (нет)8 > 24 (нет)56 > 24 (да)     s = 5612 > 56 (нет)48 > 56 (нет)25 > 56 (нет)19 > 56 (нет)17 > 56 (нет)Ответ: 56