Đang tải... (xem toàn văn)
Tính và đưa ra màn hình nhiệt độ trung bình của cả tuần và đếm số ngày có nhiệt độ lớn hơn nhiệt độ trung bình này?. - Chương trình 1 : Không sử dụng kiểu mảng - Chương trình 2 : Sử dụng[r]
(1)(2) ChươngưIVưư:ưưkiểuưdữưliệuưcóưcấuưtrúc Bµi11: (3) Bài 11 : Kh¸i niÖm M¶ng mét chiÒu lµ mét d·y h÷u h¹n c¸c phÇn tö cïng kiÓu Mảng đợc đặt tên và phần tử nó có số Để mô tả mảng chiều : cần xác định kiểu các phần tử và cách đánh số các phần tử nó * Với mảng chiều, ta quan tâm đến : - Tên kiểu mảng chiều - Số lượng phần tử - Kiểu liệu phần tử - Cách khai báo biến mảng - Cách tham chiếu đến phần tử (4) Bài 11 : Kh¸i niÖm * Ví dụ : Nhập vào nhiệt độ trung bình ngày tuần Tính và đưa màn hình nhiệt độ trung bình tuần và đếm số ngày có nhiệt độ lớn nhiệt độ trung bình này ? - Chương trình : Không sử dụng kiểu mảng - Chương trình : Sử dụng kiểu mảng chiều ( SGK – 53, 54 ) ( SGK – 54 ) Type Kmang1 = array [ Max ] of real ; Var Nhietdo : Kmang1 ; Cách : Var Nhietdo : array [ Max ] of real ; (5) Bài 11 : Khái niệm Khai b¸o m¶ng mét chiÒu PASCAL * C¸ch 1: Khai b¸o trùc tiÕp VAR <Tªn biÕn m¶ng>: ARRAY [ KiÓu chØ sè] of <KiÓu phÇn tö>; * C¸ch 2: Khai b¸o gi¸n tiÕp TYPE <Tªn kiÓu m¶ng>= ARRAY [ KiÓu chØ sè] of <KiÓu phÇn tö>; VAR <Tªn biÕn m¶ng>:<Tªn kiÓu m¶ng>; Tham chiếu Trong đó : tới phần tử mảng chiều : Tên biếnđể mảng sốkiểu ] liệu - Type : là từ khoá dùng định[ nghĩa Ví :dụ [ 20] -> Tham - Array là :tênNhietdo chuẩn để kiểu mảng.chiếu đến nhiệt độ ngày thứ 20 - Kiểu số : là đoạn số nguyên liên tục có dạng n1 n2 ( n1 < n2 ) -Kiểu phần tử : là kiểu liệu các phần tử mảng (6) C¸c thao t¸c xö lÝ m¶ng mét chiÒu a NhËp m¶ng mét chiÒu VÝ dô: NhËp sè phÇn tö cho m¶ng (N phÇn tö) C¸c bíc NhËp sè phÇn tö cña m¶ng (n) ThÓ hiÖn b»ng pascal Write(‘ Nhap gia tri cho n:’); Readln(n); NhËp vµo gi¸ trÞ cña c¸c phÇn tö m¶ng (A[i]) For i:=1 to n Begin Write(‘nhap phan tu thu’ ,i, ’ : ’); Readln(A[i]); end; (7) b In m¶ng mét chiÒu VÝ dô: Thùc hiÖn in m¶ng võa nhËp - Th«ng b¸o Writeln(‘ Mang vua nhap : ’); - In gi¸ trÞ cña c¸c phÇn tö For i:=1 to n Write(A[i]:3); (8) c C¸c thao t¸c xö lÝ m¶ng * TÝnh tæng c¸c phÇn tö cã m¶ng S := 0; VÝ dô 1: TÝnh tæng c¸c phÇn tö m¶ng For i := to n S := S + A[i]; 15 20 10 25 18 12 30 S = 130 Thông thờng, các thao tác xử lí mảng chiều dùng câu lệnh FOR DO (9) c C¸c thao t¸c xö lÝ m¶ng * TÝnh tæng c¸c phÇn tö m¶ng tho¶ m·n ®iÒu kiÖn cho tríc S := 0; VÝ dô 2: TÝnh tæng c¸c phÇn tö m¶ng chia hÕt cho For i :=1 to n IF A[i] mod = then S:=S+A[i]; 15 20 16 25 S = 45 18 12 19 (10) c C¸c thao t¸c xö lÝ kh¸c * §Õm c¸c phÇn tö m¶ng tho¶ m·n ®iÒu kiÖn cho tríc dem :=0; Ví dụ: Đếm số ngày có nhiệt độ cao For i :=1 to n nhiệt độ TB tuần IF A[i]>TB then dem:=dem+1; i A[i] Dem=0 17 20 18 21 19 17 19 +1 +1 +1 +1 TB = 18.7 (11) - ThuËt to¸n t×m max Ngời ta đặt bóng có kích thớc khác hộp đã đợc đậy nắp nh hình bên Chỉ dùng tay hãy tìm qu¶ bãng cã kÝch thíc lín nhÊt (12) Cïng t×m thuËt to¸n Qu¶ nµy lín nhÊt MAX Qu¶ nµy míi lín nhÊt å!T×m Qu¶ra nµy qu¶lín lín nhÊt h¬n råi! (13) - ThuËt to¸n t×m Max: * T×m phÇn tö lín nhÊt cña m¶ng Max := A[1]; For i :=1 To N Do if A[ i ] > Max then Max := A[i]; Bµi tËp vËn dông §Ò bµi: ViÕt ch¬ng tr×nh nhËp vµo m¶ng A gåm N phÇn tö cã kiÓu sè nguyªn + TÝnh tæng c¸c phÇn tö cã gi¸ trÞ ch½n m¶ng (14) Câu hỏi trắc nghiệm : Chọn đáp án đúng Câu : Phát biểu nào đây kiểu mảng là phù hợp ? a Là tập hợp các số nguyên c Là dãy hữu hạn các phần tử cùng kiểu b Độ dài tối đa mảng là 255 d Mảng không thể chứa ki tự Câu : Thế nào là khai báo biến mảng gián tiếp ? a Khai báo biến mảng các số nguyên b Khai báo biến mảng các số thực c Khai báo biến mảng các kí tự d Khai báo thông qua kiểu mảng đã có Câu : Cho khai báo mảng sau : Var A : array[ 10] of integer ; Phương án nào đây phần tử thứ 10 mảng ? a A [10] b A(10) c A[9] d A(9) (15) H·y nhí! 15 20 19 25 18 12 16 M¶ng mét chiÒu lµ mét d·y h÷u h¹n c¸c phÇn tö cïng kiÓu Var A:ARRAY[1 100] OF integer; Khai b¸o: tªn m¶ng, chØ sè ®Çu, chØ sè cuèi, kiÓu phÇn tö A[5] = 18 Tham chiÕu phÇn tö m¶ng: Tªn biÕn m¶ng[chØ sè phÇn tö] NhiÒu thao t¸c xö lÝ m¶ng dïng cÊu tróc lÆp FOR TO DO (16) Bµi tËp vÒ nhµ: C¸c em chuÈn bÞ: - Nghiên cứu ví dụ 1, ( SGK – 56, 57 ) - Làm các bài tập 3, 4, 5, ( SGK – 79 ) (17) (18)