Массивы .
Одномерные и двумерные массивы:
Описание, ввод/вывод,
типы решаемых задач.
Одномерные(линейные) массивы.
Тип данных
Имя
2
0
15
1
-3
-5
4
7
6
5
4
3
2
1
Линейные массивы.
имя
[сколько_элементов]
тип_элементов
const
n=10;
var
mass:array [1..n] of integer;
Линейные массивы
а) Ввод данных в массив осуществляется поэлементно
mass[1]:=;
mass[2]:=;
б) Ввод данных организован в цикле:
for i:=1 to n do
mass[i]:=;
Можно все, что не запрещено!!!
const
m=10;
type
Massiv=array[1..m] of Lmassiv;
var
mass1:massiv;
Имя
Двумерные массивы
Опр.1
Матрица – прямоугольная таб-лица чисел.
M – строк
N – столбцов
Матрица размерности M N
Опр.2
Двумерный массив – способ организации данных, при котором каждый элемент определяется номером строки и номером столбца, на пересечении которых он расположен.
Двумерные массивы
Тип данных
6
5
1
2
3
4
1
2
5
-5
54
12
10
2
18
4
0
12
3
22
3
14
12
2
56
14
12
12
4
10
-4
6
9
14
12
Mass1[3,5]=?
= 12
Двумерные массивы
const
m=10;n=10;
type
Lmassiv=array[1..n] of integer;
Massiv=array[1..m] of Lmassiv;
var
mass1:massiv;
Lmassiv=array[1..n] of integer;
Massiv=array[1..m] of Lmassiv;
Двумерные массивы
const
m=10; n=10;
type
matrix=array[1..m,1..n] of integer;
var
mat : matrix;
i, j : integer;
matrix=array[1..m,1..n] of integer;
Двумерные массивы.
…
for i:=1 to m do
for j:=1 to n do
begin
write(‘mat[ ’, i, j, ’ ] = ‘);
read(mat[i, j])
end;
…
Двумерные массивы
Пример: дан двумерный массив чисел m x n. Вывести на экран сумму элементов строк массива.
Решение:
1
2
3
4
Листинг программы
program matrix1;
uses crt;
const m=10; n=20;
var mas : array[1..m, 1..n] of integer;
i, j, s : integer;
begin clrscr;
for i:=1 to m do
for j:=1 to n do mas[i, j]:=random(51)-50;
Листинг программы
for i:=1 to m do
begin
s:=0;
for j:=1 to n do s:=s+mas[i, j];
writeln(i, ‘ – ая = ’, s:5)
end;
readkey
end.