Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài Khi kiểm tra 5 học sinh. Kết quả kiểm tra được ghi lại như sau: 5 7 9 6 8 Diem1 Diem2 Diem3 Diem4 Diem5 Dãy số Với dãy số này, Gv có thể thực hiện những phép toán nào ? Viết chương trình tính Điểm trung bình cộng của 5 điểm trên ? Với dãy số ta có thể : + Tính tổng + Tính Trung bình cộng + Tìm số lớn nhất + Tìm số nhỏ nhất + Sắp xếp tăng dần hoặc giảm dần Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài Chương trình tính điểm TB. Ta cần khai báo mấy biến ? Kiểu dữ liệu là gì ? Viết chương trình tính TBC của 30 con điểm ? Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài Em có nhận xét gì về + Lệnh khai báo biến ? + Lệnh nhập biến ? + Lệnh tính TB cộng ? Lệnh khai báo biến dài => Chương trình dài Lệnh nhập dữ liệu dài => Chương trình dài Lệnh tính TB cũng dài => Dễ nhầm lẫn, sai sót khi viết - Để giúp giải quyết các vấn đề trên, mọi NNLT đều có Một kiểu dữ liệu được gọi là Kiểu mảng + Cho phép khai báo ngắn gọn hơn chỉ bằng 1 lệnh: Var Diem : Array[1 30] of Real; Cho phép viết lệnh nhập Dãy số nhanh hơn chỉ bằng 1 lệnh: For i:=1 to 30 do Readln(Diem[i]); Cho phép viết lệnh xử lý Dãy số gọn, nhanh hơn: For i:=1 to 30 do S:=S+Diem[i]; Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài Kiểu mảng ? 0 - Biến là ô nhớ đã được đặt tên, khi được khai báo bằng lệnh Var, máy sẽ cung cấp cho ta các ô nhớ để lưu giữ giá trị Var i : integer; i Var Diem1, Diem2, Diem3 : Real; 0.0 0.0 0.0 Diem1 Diem2 Diem3 Để lưu giữ một dãy số, ta cần có một mảng các ô nhớ. Ví dụ dưới đây là một mảng 11 ô nhớ (11 biến) có cùng 1 tên: Diem Biến i Mảng Diem Diem Diem Diem Diem Diem Chỉ số 1 2 3 4 5 6 7 k - Dữ liệu kiểu Mảng là một tập hợp hữu hạn các ô nhớ có cùng tên, có cùng kiểu dữ liệu, có thứ tự,. Các ô nhớ được đánh số thứ tự (chỉ số) để phân biệt. Mỗi ô nhớ được gọi là 1 phần tử của mảng. - Khi khai báo 1 biến có kiểu Mảng, biến đó gọi là biến mảng. - Biến mảng có thể lưu giữ được 1 dãy số, mỗi số được lưu trong 1 ô nhớ. Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài 2. Ví dụ về biến Mảng a) Khai báo biến mảng. Trong đó: + Chỉ số đầu và chỉ số cuối là 2 số nguyên thoả mãn: chỉ số đầu <= chỉ số cuối + Kiểu dữ liệu: Integer hoặc Real Ví dụ: Để lưu trữ 30 con điểm ta khai báo Var Diem : array[1 30] of Real; - Khi đó: +Tên biến mảng là : Diem + Biến Diem có kiểu dữ liệu là: 1 mảng 30 số thực (array[1…30] of Real) +Mảng có 30 phần tử: Diem[1]…Diem[30] +Mỗi phần tử có kiểu Real +Giá trị của biến Diem là 1 dãy 30 số thực Diem Diem[1] Diem[2] Diem[3] Diem[4] Diem[29] Diem[30] Chỉ số 1 2 3 4 5 6 7 29 30 Tên các phần tử Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài - Khai báo các biến mảng để lưu giữ: a) chiều cao của 50 học sinh b) Cân nặng của 30 học sinh; c) Tuổi của 30 học sinh; - Hãy cho biết + Tên biến mảng ? + Kiểu dữ liệu của biến mảng + Số phần tử + Kiểu của mỗi phần tử + Giá trị của biến mảng trong mỗi ví dụ trên. Var Chieucao : array[1 50] of Real; Var Chieucao : array[1 30] of Real; Var Chieucao : array[1 30] of integer Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài b) Nhập dữ liệu cho biến mảng - Ta dùng 1 vòng lặp để nhập dữ liệu cho tất cả các phần tử của mảng. For i:=<chỉsốđầu> to <chỉsốcuối> Do Read(<Tênbiếnmảng[i]>); Ví dụ: For i := 1 to 30 do Read(Diem[i]); - Thường dùng 1 vòng For để xuất dữ liệu của tất cả phần tử mảng For i:=<chỉsốđầu> to <chỉ số cuối> Do Write(<Tênbiếnmảng[i]>); Ví dụ: For i := 1 to 30 do Write(Diem[i]); - Ta cũng có thể thay đổi giá trị cho 1 vài phần tử đơn lẻ bằng lệnh gán: Diem[1]:= 7; Diem[2]:=9;… c) Xuất dữ liệu từ biến mảng. Bài 9: LÀM VIỆC VỚI DÃY SỐ 1. Dãy số và biến mảng 2. Ví dụ về biến mảng 3. Tìm Max, Min của dãy số 4. Tổng kết bài c) Xử lý: - Ta có thể nhập, xuất, gán giá trị, tính toán trên các phần tử của mảng như những biến thông thường. For i:=1 to 30 do if diem[i]>max then max :=Diem[i]; Nhập: Xuất: Xử lí: For i:=1 to 30 Do Readln( Diem[i] ); For i:=1 to 30 Do Write( Diem[i] ); For i:=1 to 30 do if diem[i]>=8 then Write( diem[i] ); For i:=1 to 30 do diem[i] :=1; For i:=1 to 30 do S :=S+diem[i]; In giá trị 30 phần tử ra màn hình Chỉ in phần tử có giá trị >=8 Gán 1 cho 30 phần tử Tính tổng các phần tử