© 2020 Bài Kiểm Tra.com. All Rights Reserved.
| Hoạt động của giáo viên và học sinh | Nội dung |
| Hoạt động 1: Tìm giá trị lớn nhất và nhỏ nhất của dãy số (20’) | |
| - GV: Yêu cầu HS đọc ví dụ 3 (SGK Tr 78). - GV: Giới thiệu thuật toán tìm MAX (số lớn nhất của dãy số nguyên nhập từ bàn phím). - Sau khi giới thiệu xong thuật toán tìm Max giáo viên hướng dẫn HS xác định các biến, kiểu biến và viết khai báo biến; viết câu lệnh thực hiện các bước nhập N, nhập các phần tử của mảng, tìm Max, in Max ra màn hình. - GV: Từ các hướng dẫn trên giúp HS có thể hiểu được các đoạn cương trình. GV đưa ra chương trình đầy đủ. |
3. Tìm giá trị lớn nhất và nhỏ nhất của dãy số Thuật toán tìm Max của dãy số nguyên nhập từ bàn phím như sau: Bước 1. Nhập N và dãy A1,..., An Bước 2. Max ¬ A1 Bước 3. Lần lượt gán giá trị từ 2 đến N cho i. Với mỗi giá trị của i thì thực hiện: Nếu Max <Ai thì Max¬Ai Bước 4. Đưa ra màn hình giá trị Max rồi kết thúc. |
| Hoạt động 2 : thực hành (15’’) | |
| GV: Yêu cầu HS nhập lại chương trình vừa học, dịch, chạy chương trình và nhận xét kết quả. - HS: Đọc ví dụ SGK. - HS: Chú ý quan sát và ghi chép. - HS: Theo hướng dẫn thực hiện các yêu cầu của - HS: Hình thành được các đoạn chương trình và quan sát, ghi chép lại chương trình đầy đủ GV đưa ra. - HS: Khởi động máy tính và thực hành. |
program P_Max; Var i, N, Max : integer; A: array[1..100] of integer; Begin {Nhap N} write('Hay nhap do dai cua day so, N = '); readln(N); {Nhap day so} writeln('Nhap cac phan tu cua day so:'); For i:=1 to N do Begin write('a[',i,']='); readln(a[i]); End; {Tim Max} Max:=a[1]; for i:=2 to n do if Max<a[i] then Max:=a[i]; {Hien thi Max ra man hinh} write('So lon nhat la Max = ',Max); readln; End. Thực hành |
| Hoạt động 3: củng cố (3’) | |
| - Khái niệm mảng một chiều - Cách khai báo mảng, nhập, in, truy cập các phần tử của mảng. - Thuật toán tìm số lớn nhất và nhỏ nhất trong mảng |
|
Ý kiến bạn đọc
Bài giảng tin học 8 - Bài 9: Làm việc với dãy số (Tiết 1)