Найди соответствия между скриптами и блоками и соедини их линиями

297

338

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

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

НастюсикПоможусик

Информатика

4,7(52 оценок)

// pascalabc.net 3.0, сборка 1052 type matrix=array[,] of integer; function sumrow(a: matrix; i: integer): integer; var j,s: integer; begin s: =0; for j: =0 to length(a,1)-1 do s: =s+a[i,j]; sumrow: =s end; var i,j,m,n: integer; a: matrix; begin write('введите количество строк и столбцов массива: '); read(m,n); setlength(a,m,n); writeln('исходный массив'); randomize; for i: =0 to m-1 do begin for j: =0 to n-1 do begin a[i,j]: =random(51)-25; // интервал [-25; 25] write(a[i,j]: 4) end; writeln end; write('построчные суммы: '); for i: =0 to m-1 do write(sumrow(a,i),' '); writeln end. тестовое решение: введите количество строк и столбцов массива: 10 13 исходный массив -11 19 -1 12 -19 -7 25 16 6 -18 8 16 -22 -10 -9 21 21 -16 -14 10 7 -7 -21 23 -25 14 -16 -5 18 -6 12 -11 -23 -3 20 24 -4 -18 -16 -15 -1 5 -5 -9 -3 -9 0 0 21 -3 -15 -1 21 19 -17 21 15 2 11 -7 -17 5 23 -14 -5 -7 13 7 -5 -8 0 13 -25 -24 -14 -23 24 14 0 10 -11 10 -1 -5 -17 -12 -6 -16 -12 25 -16 20 -3 17 -24 19 7 -16 22 -22 3 18 -21 3 23 -3 -1 20 7 -19 23 -25 -24 -24 -21 -1 -20 2 -23 -18 25 4 -7 -4 -17 5 -9 -17 25 -8 построчные суммы: 24 -6 -28 -35 57 -35 -51 23 -65 -42