Mảng hai chiều

2. Mảng hai chiều:
* Xét bài toán
7935
382
9
6
7
41
Mảng 1 chiều
Cột
Dòng
Mảng 2 chiều
* Khái niệm:
a. Khai báo
* C¸ch 2: Khai b¸o gi¸n tiÕp
TYPE < tªn kiÓu m¶ng> = array[kiÓuchØ sè dßng,kiÓu chØ sè cét] of <kiÓuphÇn tö>;
Var <tªn biÕn m¶ng> : <tªn kiÓu m¶ng >;
VÝ dô: TYPE Bang = array[1..9,1..9] of integer;
Var A, B: Bang;
* C¸ch 1: Khai b¸o trùc tiÕp
Var < tªn biÕnm¶ng> : array[KiÓu chØ sè dßng,kiÓu chØ sè cét] of <kiÓuphÇn tö>;
VÝ dô: Var Bang: array[1..9,1..9] of integer;
Var Mang: array[1..9,1..9] of integer;
A
7935
3829
6741
VÝ dô:

A[2,3]= 8.
1 2 3 4

1
2
3
Tên biến
mảng
Chỉ số
hàng
Chỉ số
cột
[
]
,
A
1
1
7
935
382
9
6
7
41
2
3
3

2
4
i
J

b. Một số ví dụ
Ví dụ 1:
Nhập vào một mảng hai chiều gồm n
hàng và m cột được nhập vào từ bàn phím
For i:= 1 to n do
For j:=1 to m do
readln(A[i,j]);
Ví dụ 2:
Hiển thị mảng vừa nhập
For i:= 1 to n do
Begin
For j:=1 to m do
write(A[i,j]);
End;
I= 1
I= 2
I= 3
1 2 3 4 5 6 7 8 9
2 4 6 8 10 12 14 16 18
3 6 9 12 15 18 21 24 27
4 8 12 16 20 24 28 32 36
5 10 15 20 25 30 35 40 45
6 12 18 24 30 36 42 48 54
7 14 21 28 35 42 49 56 63
8 16 24 32 40 48 56 64 72
9 18 27 36 45 54 63 72 81
1*2
2*2
1*3
Cột

Hàng
J =
J =
i*J
i*J
J =
i =
I =
i*J
Ví dụ bảng nhân
Program bang_nhan;
uses crt;
var B: array[1..9,1..10] of
integer;
i, j: integer;
Begin
clrscr;
for i:=1 to 9 do
for j:= 1 to 10 do
b[i,j]:= i*j;
for i:= 1 to 9 do
Begin
for j:= 1 to 10 do
write(b[i,j]:4);
writeln;
End;
Readln;
End.
2*1
i*J1

2
3
4
5
6
7
8
9
1 2 3 4 5 6 7 8
9
i*J