Какой будет результат кода? s: =0; for i: =1 to 10 do begin m1: = i mod 2; m2: = i mod 3; if (m1=1) or (m2=0) then s: =s+1; end; writeln(s);

В результате выполнения программы будет подсчитано число нечетных элементов (это 1, 3, 5, 7, 9), сюда же будет приплюсовано и оно четное (это 6), которое делится на 3.

Всего:
S=6 чисел.

Проверим результат, выполнив код на ABCPascal (см. скрин)