Регистрация
Dishame
13.09.2020 23:08
Информатика
Есть ответ 👍

тут моё будущее на кону

​

147
344
Посмотреть ответы 1

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

katyarakushina03
katyarakushina03
4,5(96 оценок)
Const n=5; m=5; var a: array [1..n,1..m] of integer;         i,j,s,s_: integer; begin writeln('исходная матрица: '); for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =random(15)+1; if (i mod 2) = 0  then s: =s+a[i,j] else s_: =s_+a[i,j]; write(a[i,j]: 4); end; writeln; end; writeln; writeln('сумма чётных строк: ',s); writeln('сумма не чётных строк: ',s_); end.

Популярно: Информатика