Какой будет результат кода? ... 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);
Какой будет результат кода?
...
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 (см. скрин)
Не нашли ответ?
Похожие вопросы