Презентация "Двумерные массивы"
презентация к уроку по информатике и икт (11 класс) на тему

Слайд 1

Двумерные массивы В Паскале двумерный массив трактуется как одномерный массив, каждый элемент которого также является массивом (массив массивов)

Слайд 2

Двумерные массивы представляются в виде прямоугольной таблицы - матрицы . Если количество строк равно количеству столбцов, то матрица называется квадратной . A Главная диагональ Побочная диагональ Квадратная матрица размером 3*3 Матрица, состоящая из 3 строк и 4 столбцов

Слайд 3

Положение элемента в двумерном массиве определяется двумя индексами - номером строки и номером столбца , на пересечении которых он находится . – элемент расположен в первой строке второго столбца . Элементы первой строки Элементы второго столбца

Слайд 4

Описание двумерного массива Описание двумерного массива в разделе Var аналогично описанию одномерного массива, только необходимо указывать диапазон изменения двух индексов - столбцов и строк . V ar b: array [1.. 1 5 ,1.. 20 ] of real; Или Const n=1 5 ; m= 20 ; Var a: a rray [1.. n, 1 .. m] of integer;

Слайд 5

Обращение к элементам двумерного массива в Паскале имеет вид: a [ i , j ] , где a - имя массива, описанного в блоке VAR , i - номер строки, j - номер столбца. a [1 , 2 ] – обращение к элементу 1-й строки 2-го столбца массива a . Обращение к элементам

Слайд 6

Ввод элементов двумерного массива с клавиатуры w riteln (‘ Введите элементы массива ’); f or i:=1 to n do f or j:= 1 to m do begin write ( ‘a[‘ , i, ’,’ , j, ’]=‘ ); readln (a[i , j]); end ; { Цикл по номерам строк - перебирает строки } { Цикл по номерам столбцов }

Слайд 7

Вывод элементов двумерного массива в виде таблицы writeln (‘ Вывод массива по строкам ’); for i:=1 to n do begin for j:= 1 to m do write (a[ i, j] :5); writeln; end ; { Перебор строк } { Перебор столбцов и вывод элемента } { Переход на новую строку }

Слайд 8

Заполнение двумерного массива случайными числами randomize; f or i:=1 to n do begin for j:=1 to m do begin a[ i , j]:=random(11)+2; write(a[i , j],’ ‘); e nd; w riteln; end ; Массив заполняется случайными целыми числами из интервала [2,12]

Слайд 9

Суммирование элементов двумерного массива Program summa _1 ; Const n1=10 0 ; m1=1 00 ; Var a: array [1.. n1,1 .. m1] of integer ; i, j, sum, n, m: integer; Begin randomize ; write ( ‘Количество строк > ‘); readln (n); write ( ‘Количество столбцов > ‘); re adln (m); for i:=1 to n do for j:=1 to m do a[i , j]:=random(11)+ 2; writeln (‘ Исходный массив ’); for i:=1 to n do begin for j:=1 to m do Write (a[ i, j] :5); w riteln; e nd ; sum :=0; fo r i :=1 to n do f or j:=1 to m do sum:=sum+ a [i,j]; writ e ln ( 'Сумма=',sum); end.

Слайд 10

Найти сумму элементов каждой строки массива Program summa _ 2; Const n1=10 0 ; m1=1 00 ; Var a: array [1.. n1,1 .. m1] of integer ; i, j, sum, n, m: integer; Begin randomize ; write ( ‘Введите количество строк‘); readln (n); write ( ‘Введите количество столбцов‘); re adln (m); for i:=1 to n do for j:=1 to m do a[i , j]:=random(11)+ 2; writeln (‘ Исходный массив ’); for i:=1 to n do begin for j:=1 to m do Write (a[ i, j] :5); w riteln; e nd ; for i :=1 to n do begin sum :=0; f or j:=1 to m do sum:=sum+ a [i,j]; writ e ln ( 'Сумма=',sum ); end; end .

Слайд 11

Сумма элементов главной диагонали (x[1,1], x[2,2] и т.д .) . Program sum; Const n 1 =10 ; m 1 =12 ; Var a: array [1.. n 1 ,1 .. m 1 ] of integer; i, j, sum : integer; Begin … { Вставить - ввод размерности, ввод элементов массива и вывод в виде таблицы } sum:=0; for i :=1 to n do sum:=sum+ a [i,i]; writеln ( 'Сумма=',sum); end. На главной диагонали номер строки равен номеру столбца, т.е. элементами главной диагонали являются a 11 , a 22 , a 33 и т.д.

Слайд 12

Сумма по столбцам с записью в новый массив zum[1..m ] Program sum; Const n=10; m=12; Var a: array [1..n,1..m] of integer ; zum : array [1 ..m] of integer ; I, j, sum : integer; Begin … { Вставить - ввод элементов массива и вывод в виде матрицы } for j :=1 to m do begin sum :=0; for i :=1 to n do sum := sum +x[i,j] ; zum [ j ]: =sum end; f or j :=1 to m do write ( zum [ j ]: 4 ); End.