Thư Viện STEM STEAM Tiết 51 TRẢI NGHIỆM I Mục đích 1 Kiến thức Biết cách khai báo mảng, nhập, in, truy cập các phần tử của mảng 2 Kĩ năng Khai báo mảng, nhập giá trị cho mảng, thuật toán tìm giá trị t[.]
Tiết: 51 TRẢI NGHIỆM I.Mục đích 1.Kiến thức Biết cách khai báo mảng, nhập, in, truy cập phần tử mảng 2.Kĩ Khai báo mảng, nhập giá trị cho mảng, thuật tốn tìm giá trị trung bình 3.Thái độ HS có thái độ ham hiểu biết, học hỏi Định hướng phát triển lực: lực sử dụng máy tính, lực giải vấn đề, lực sáng tạo, ứng dụng KHKT, lực tự học, lực hợp tác, làm việc nhóm PHƯƠNG PHÁP: Luyện tập II CHUẨN BỊ BÀI HỌC: Giáo viên : - SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học Học sinh : - Làm tập SGK III TIẾN TRÌNH BÀI HỌC: Hoạt động 1: Khởi động (5 phút) Ổn định tổ chức lớp Kiểm tra cũ ?Viết cú pháp khai báo biến mảng ? Nêu cách để tìm giá trị lớn nhỏ dãy số ? Hoạt động 2: Hình thành kiến thức (30 phút) HOẠT ĐỘNG CỦA GV VÀ HS NỘI DUNG, YÊU CẦU CẦN ĐẠT GV: Đưa tập gọi học sinh lên bảng trả lời 1) Hãy nêu lợi ích việc sử dụng 1) Lợi ích việc sử dụng biến mảng rút gọn việc viết chương trình, sử dụng câu lệnh lặp để biến mảng chương trình thay nhiều câu lệnh Ngồi cịn lưu trữ xử lí nhiều liệu có nội dung liên quan đến cách hiệu 2) Đáp án a) Sai Phải thay dấu phẩy hai dấu 2) Các khai báo biến mảng sau chấm; b) c) Sai, giá trị nhỏ lớn Pascal hay sai? số mảng phải số nguyên; d) Sai, giá trị đâu var X: Array[10,13] Of Integer; var X: Array[5 10.5] Of Real; var X: Array[3.4 4.8] Of Integer; var X: Array[10 1] Of Integer; var X: Array[4 10] Of Real; số mảng phải nhỏ số cuối; e) Đúng 3) Đúng 3) "Có thể xem biến mảng biến 4) Không Giá trị nhỏ lớn số mảng tạo từ nhiều biến có kiểu, phải xác định phần khai báo chương trình tên nhất" Phát biểu hay sai? Chương trình sau: Program tb; 4) Câu lệnh khai báo biến mảng sau Uses crt; var N, i: integer; tb: real; máy tính có thực khơng? A: array[1 100] of real; var N: integer; begin A: array[1 N] of real; write('Nhap so phan tu cua mang’); readln(n); 5) Viết chương trình Pascal sử dụng biến for i:=1 to n mảng để nhập từ bàn phím phần tử write('a[‘,I,']=’); readln(n); dãy số Độ dài dãy nhập từ bàn phím Tính giá trị trung {tinh trung binh} Tb:=0 bình cho dãy số nhập vào For i:=1 to n Tb:=(tb+a[i])/I; Writeln(‘trung bình day so là:’,tb); Readln; end 3.Hoạt động 3: Luyện tập, vận dụng, mở rộng (10 phút) Cách khai báo mảng Pascal Câu lệnh nhập dãy số từ bàn phím Thuật tốn tìm giá trị trung bình Soạn thực hành sử dụng biến mảng chương trình * Rút kinh nghiệm Tiết: 52 TRẢI NGHIỆM (tiếp) I.Mục đích 1.Kiến thức Biết cách sử dụng biến mảng vào toán 2.Kĩ Ôn luyện cách khai báo mảng :array[1 100] of real; lệnh lặp if then, for do; Hiểu viết chương trình với thuật tốn tìm giá trị lớn nhất, nhỏ dãy số, tính tổng dãy số Củng cố kĩ đọc, hiểu chỉnh sửa chương trình 3.Thái độ HS có thái độ ham hiểu biết, học hỏi Định hướng phát triển lực: lực sử dụng máy tính, lực giải vấn đề, lực sáng tạo, ứng dụng KHKT, lực tự học, lực hợp tác, làm việc nhóm PHƯƠNG PHÁP: Luyện tập – thực hành II CHUẨN BỊ BÀI HỌC: Giáo viên : - SGK, giáo án, phòng máy - Đồ dùng dạy học Học sinh : - Xem trước thực hành III TIẾN TRÌNH BÀI HỌC: Hoạt động 1: Khởi động (5 phút) Ổn định tổ chức lớp Hoạt động 2: Hình thành kiến thức (30 phút) HOẠT ĐỘNG CỦA GV VÀ HS NỘI DUNG, YÊU CẦU CẦN ĐẠT Hướng dẫn G: Khai báo chương trình cho H: Khai báo G: Nhập n H: định hình đầu bước nhập dãy số G: Nhập điểm toán, điểm văn điểm toán điểm văn Bài Bài Bổ sung chỉnh sửa chương trình a) Tìm hiểu ý nghĩa câu lệnh sau đây: để nhập hai loại điểm Toán Phần khai báo: Ngữ văn bạn, sau in Var hình điểm trung bình bạn i, n: integer; lớp (theo cơng thức điểm trung bình = (điểm Tốn + điểm Ngữ văn)/2), điểm trung bình lớp theo mơn Tốn Ngữ văn b) Bổ sung câu lệnh vào vị trí thích hợp chương trình Thêm lệnh cần thiết, dịch chạy chương trình với số liệu thử TbToan, TbVan: real; DiemToan, DiemVan: array[1 100] of real; Phần thân chương trình: Begin Write(‘nhập n:’); readln(n); For i:=1 to n begin Write(‘diemtoan[‘,I,’]=’); Readln(diemtoan[i]; End; For i:=1 to n begin Write(‘diemvan[‘,I,’]=’); Readln(diemvan[i]; End; writeln('Diem trung binh:'); for i:=1 to n writeln(i,' ',(DiemToan[i]+DiemVan[i])/2:3:1); TbToan:=0; TbVan:=0; for i:=1 to n begin TbToan:=TbToan+DiemToan[i]; TbVan:=TbVan+DiemVan[i] end; TbToan:=TbToan/n; TbVan:=TbVan/n; writeln('Diem trung binh mon Toan: ',TbToan:3:2); writeln('Diem trung binh mon Van: ',TbVan:3:2); end G: Nhận xét rút toán nhập dãy số H: Chạy kiểm tra lỗi chương trình tính giá trị trung bình cho daỹ số H: đánh giá tốn 3.Hoạt động 3: Luyện tập, vận dụng, mở rộng (10 phút) Cách khai báo mảng Pascal Câu lệnh nhập dãy số từ bàn phím Thuật tốn tìm giá trị trung bình Dặn dị:Tiết sau kiểm tra thực hành tiết * Rút kinh nghiệm