До сих пор мы говорили об одномерных

До сих пор мы говорили об одномерных массивах (т. е. – это такие массивы которые имеют один индекс. a: array[1. . 10] of integer; Вторые индексы 1 2 3 4 1 23 78 -78 45 Первый индекс 2 12 -8 90 41 3 67 34 15 -11

Описание двумерных массивов var с: array[1. . 3, 1. . 4] of integer; var fff: array[1. . 10, 1. . 10] of real; Первый индекс – количество строк Второй индекс – количество столбцов

program s 1; var a: array [1. . 3, 1. . 4] of integer; i, j: integer; begin for i: =1 to 3 do begin for j: =1 to 4 do Writeln(a[i, j]); readln (a[I, j]); end; for i: =1 to 3 do begin for j: =1 to 4 do write ( a[i, j]: 4); writeln; end.

program s 2; var a: array [1. . 3, 1. . 4] of integer; i, j: integer; begin randomize; for i: =1 to 3 do begin for j: =1 to 4 do a[i, j]: =random (30); end; for i: =1 to 3 do begin for j: =1 to 4 do write ( a[i, j]: 4); writeln; end.

program f 1; var a: array [1. . 3, 1. . 4] of integer; i, j, s: integer; begin randomize; s: =0; for i: =1 to 3 do begin for j: =1 to 4 do a[i, j]: =random (30); end; for i: =1 to 3 do begin for j: =1 to 4 do s: =s+ a[i, j]; end; for i: =1 to 3 do begin for j: =1 to 4 do write ( a[i, j]: 4); writeln; end; Writeln (‘сумма элементов массива равна’, s); end.

program f 2; var a: array [1. . 3, 1. . 4] of integer; i, j, p: integer; begin randomize; p: =1; for i: =1 to 3 do begin for j: =1 to 4 do a[i, j]: =random (30); end; for i: =1 to 3 do begin for j: =1 to 4 do p: =p*a[i, j]; end; for i: =1 to 3 do begin for j: =1 to 4 do write ( a[i, j]: 4); writeln; end; Writeln (‘произведение элементов массива равно’, р); end.

program f 3; var a: array [1. . 3, 1. . 4] of integer; i, j, s, k: integer; begin randomize; s: =0; k: =0; for i: =1 to 3 do begin for j: =1 to 4 do a[i, j]: =random (30)+(15)*(-1); if a[i, j] >0 then s: =s+ a[i, j]; if a[i, j] >0 then k: =k+1; end; for i: =1 to 3 do begin for j: =1 to 4 do write ( a[i, j]: 4); writeln; end; Writeln (‘сумма элементов массива равна’, s); Writeln (‘количество эл-в массива больших 0’, k); end.

1) Задать двумерный массив размерностью 4*3 случайным образом (диапазон элементов от 1 до 10). Вывести этот массив на экран. 2) Задать двумерный массив размерностью 3*3 случайным образом (диапазон элементов от -10 до 10). Вывести этот массив на экран. Найти сумму элементов массива. 3) Задать двумерный массив размерностью 3*3 случайным образом (диапазон элементов от -10 до 10). Вывести этот массив на экран. Найти сумму элементов массива, которые меньше нуля и найти количество этих элементов.