Составьте программу находящую сумму четных чисел - вопрос №1105249168 от ааnell714 17.08.2021 14:20

Question

Информатика: Составьте программу находящую сумму четных чисел от 1 до 10. чему она равна?

ааnell714 · Answer

Var i,s:integer;begins:=0;for i:=1 to 10 do if i mod 2 = 0 then s:=s+i;writeln( s= ,s);end.Результат:s=30...