Скачать презентацию
Идет загрузка презентации. Пожалуйста, подождите
Презентация была опубликована 11 лет назад пользователемГалина Телегина
1 Двумерные массивы. Заполнение и вывод элементов
2 Понятие. Двумерный массив – это массив с двумя измерениями (прямоугольные таблицы, матрицы). Пример: таблица умножения Элементы двумерного массива имеют два индекса, которые указывают положение элемента в массиве (строку и столбец).
3 Описание массива. Var : array[1..n1, 1..n2] Где n1 – количество строк, n2 – количество столбцов. n2 – количество столбцов. Обращение к элементу массива [i,j]. Например M[i,j], M[3,8], M[i,5] Для данной таблицы M[1,3] = 5 M[2,3] = 6 M[3,2] = 8 j\ij\ij\ij\i
4 Задача: Составить программу вывода на экран таблицы умножения Program tabl; Var M:[1..9,1..9] of integer; {описание массива} I,j: integer Begin For i:=1 to 9 do begin For j:=1 to 9 do begin M[I,j] := i*j; {заполнение массива по формуле} Write(M[i,j], ); {вывод элементов построчно} End; Writeln; {переход на новую строку} End;end.
5 Задача: Задача: Заполнить произвольный массив случайными числами и вывести элемент массива запрашиваемый с клавиатуры. Program tabl; Var M:[1..20,1..20] of integer; {описание массива} I,j,n,m: integer; BeginRandomize; For i:=1 to 20 do begin For j:=1 to 20 do begin M[I,j] := random(41)-20; {заполнение массива случайными числами в диапазоне от -20 до 20} Write(M[i,j], ); {вывод элементов построчно} End; Writeln; {переход на новую строку} End; Writeln(Введите номер строки и столбца данного элемента); Readln (n,m); Writeln (Требуемый элемент, M[n,m]); end.
6 Для самостоятельного решения 1. Дан произвольный двумерный массив. Составить программу вывода на экран любого элемента второй строки. 2. Дан произвольный двумерный массив. Составить программу расчёта суммы двух элементов массива, запрашиваемых с клавиатуры. 3. Дан произвольный двумерный массив. Составить программу, которая меняет местами элементы массива, находящиеся в левом верхнем и правом нижнем углах. Вывести на экран исходный и полученный массивы.
Еще похожие презентации в нашем архиве:
© 2024 MyShared Inc.
All rights reserved.