Переведите в кумир 1. const n = 10; var i,s: integer; m: array [1..n] of integer; begin randomize; s: =0; for i: =1 to n do begin m[i]: = random(201)-100; writeln(m[i]); end; for i: =1 to n do if m[i] mod 2 = 0 then s: =s+m[i]; writeln('summa = ',s); readln; end.

155

477

Посмотреть ответы 2

Ответы на вопрос:

6e3yMHbIu1

Информатика

4,6(76 оценок)

Было: const n = 10; var i, s: integer; m: array [1..n] of integer; begin randomize; s : = 0; for i : = 1 to n do begin m[i] : = random(201) - 100; writeln(m[i]); end; for i : = 1 to n do if m[i] mod 2 = 0 then s : = s + m[i]; writeln('summa = ', s); readln; end. стало: цел i, s, n n : = 10 цел таб m[1: n] алг нач s : = 0 нц для i от 1 до n m[i] : = irand(-100, 100) вывод m[i], нс кц нц для i от 1 до n если mod(m[i], 2) = 0 то s : = s + m[i] все кц вывод "summa = ", s кон