Mảng hai chiều

2 Mang hai chiéu:

Mang 2 chiêu

ad Khai bao

* Cach 1: Khai bao truc tiép

Var <tén biénmang>: array[Kiéu chi so dong, kiéu chi so cot] of <kiéuphan tu>:

Vi du: Var Bang: array[1 9,1 9] of integer;

Var Mang: array[1 9,1 9] of integer;

* Cach 2: Khai bao gian tiép

TYPE <tén kiéu mang> = array(kiéuchi so dong,kiéu chi so cot] of <kiéuphan tu>:

Var <tén bién mang> : <tén kiéu mang >:

Vidu: TYPE Bang = array[1 9,1 9] of integer;

Var A, B: Bang;

Vi du:

LAN

Tén bién

mang

Chỉ số

hang ,

Chi s

923 3

b Một số ví dụ

Ví dụ I1:

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 j:=1 to m do

readin(Ali,j]);

Vi du 2:

Hién thi mang vira nhap

For i:= 1 to n do l= 1

For j:=1 to m do

write(A[i,j]); |= 3

End;

| tee

Vi du bang nhan

Program bang_nhan;

uses crt;

var B: array{1 9,1 10] of

integer;

1, J: Integer;

Begin

cÏrscr;

for i:=1 to 9 do

for j:= 1 to 10 do

bli,j |= 1");

for 1:= 1 to 9 do

Begin

for j:= 1 to 10 do

write(b[i.J]:4):

writeln;

End;

ReadIn;

End

Hang i=

|=

" |”; RE 10 | 12 | 14 | 16 | 18

Van dung: