Tham chiÕu phÇn tö m¶ng: Tªn biÕn m¶ng[cs dßng,cs cét] Thao tác xử lí thườngdùng cấu trúc hai c©u lÖnh FOR … DO lång nhau.[r]
(1)Bµi 14 GIÁO VIÊN: NGUYỄN TRUNG KIÊN Gi¸o ¸n ®iÖn tö tin häc líp 11 Lop11.com (2) Kh¸i niÖm Lµ m¶ng mét chiÒu mµ mçi phÇn tö cña nã l¹i lµ m¶ng mét chiÒu VÝ dô: A Trong đó: Tªn m¶ng: A; 1 3 M¶ng gåm: dßng cét; KiÓu d÷ liÖu cña c¸c phÇn tö: KiÓu nguyªn; Khi tham chiếu đến phần tử dòng i cột j ta viết: A[i,j] VÝ dô: A[2,3]= Lop11.com (3) Khai b¸o m¶ng hai chiÒu * C¸ch 1: 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 <ds biÕn m¶ng> : <tªn kiÓu m¶ng >; VÝ dô: TYPE Bang = array[1 9,1 9] of integer; Var A: Bang; * C¸ch 2: Khai b¸o trùc tiÕp Var < Ds 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 A,B: array[1 20,1 30] of real; Lop11.com (4) C¸c thao t¸c xö lÝ m¶ng hai chiÒu a NhËp m¶ng hai chiÒu A 1 3 ThÓ hiÖn b»ng pascal Các bước : NhËp sè dßng (n) vµ sè cét (m) Write(‘ Nhap vao so dong, cot:’); Readln(n,m); NhËp vµo gi¸ trÞ cña c¸c phÇn tö m¶ng (A[i,j]) Lop11.com For i:= to n For j:=1 to m Begin write(‘A[’,i,j,’ ] = ’ ); readln(A[i,j]); end; (5) b In m¶ng hai chiÒu Th«ng b¸o Writeln(‘ Mang vua nhap : ’); In gi¸ trÞ cña c¸c phÇn tö For i:=1 to n Begin KÕt qu¶ in mµn h×nh: For j:=1 to m Write(A[i,j],’ ’); Writeln; Mang vua nhap: end; 9 C¸c thao t¸c xö lÝ m¶ng hai chiÒu thườngdùng hai câu lệnh FOR lồng Lop11.com (6) c C¸c thao t¸c xö lÝ kh¸c Ví dụ: Tính và in màn hình bảng cửu chương * TÝnh QuanFor s¸ti :=1 b¶ng to 9cöu chươngta thấy: A[2,5]=2 =to10 Forxj:=1 :=40 i*j; A[5,8]=5A[i,j] x8= B©y1giê 2c¸c 3em 4h·y viÕt chương tr×nh 10 hoµn chØnh 12 15 cho4bµi8to¸n vÝ dô 12 16 20 nhÐ ? A[i,j]=i*j * IN mµn h×nh 12 14 16 18 18 21 24 27 24 28 32 36 10 15 20 25 30 35 40 45 12 18 24 30 36 42 48 54 14 21 28 35 42 49 56 63 For j:=1 to write(A[i,j]:5); 12 24 32 40 48 56 68 72 writeln; writeln; 18 27 36 45 54 63 72 81 For i :=1 to Begin End; Lop11.com (7) H·y nhí! 15 20 19 16 25 18 17 12 16 Var A:ARRAY[1 10,1 10] OF integer; A[1,3] = 19 M¶ng hai chiÒu lµ m¶ng mét chiÒu mµ mçi phÇn tö cña nã l¹i lµ m¶ng mét chiÒu Khai b¸o: tªn m¶ng, kiÓu chØ sè dßng, kiÓu chØ sè cét, kiÓu phÇn tö Tham chiÕu phÇn tö m¶ng: Tªn biÕn m¶ng[cs dßng,cs cét] Thao tác xử lí thườngdùng cấu trúc hai c©u lÖnh FOR … DO lång Lop11.com (8)