1. дана целочисленная матрица а(n,n). определите, будет ли сумма всех элементов, расположенных выше главной диагонали при делении на три нечётным числом.

258

500

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

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

Vano22052000

Информатика

4,8(42 оценок)

//pascal abc.net v3.1 сборка 1172 var ma: array of array of integer; i,j,n,r: integer; begin readln(n); setlength(ma,n+1); for i: =1 to n do setlength(ma[i],n+1); writeln('matrix: '); for i: =1 to n do begin writeln; for j: =1 to n do begin ma[i,j]: =random(n); write(ma[i,j]: 4); end; end; for i: =1 to n do for j: =i+1 to n do r: =r+ma[i,j]; r: =r div 3; writeln; if odd(r) then writeln('да') else writeln('нет'); end. пример ввода: 4 пример вывода: matrix: 0 1 3 3 3 0 0 3 2 3 0 2 3 0 2 3 нет