Hoạt động 2: Thực hành ví dụ 521’ Bài 5 SGK: Viết Gv: Cho hs đọc bài tập 5 và Học sinh: chia nhóm thực hành chương trình Pascal sử trả lời Chương trình có thể như sau: dụng biến mảng để [r]
Tuần 29 Tiết 37 Ngày soạn: 10/03/2018 Ngày dạy: 14/03/2018 Bài thực hành 7: XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH (t1) I MỤC TIÊU: Kiến thức: - Biết cách sử dụng biến mảng vào toán Kỹ năng: - Ôn luyện cách khai báo mảng :array[1 100] of real; lệnh lặp if then, for do; - Củng cố kĩ đọc, hiểu chỉnh sửa chương trình - 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 Thái độ: HS có thái độ ham hiểu biết, học hỏi II CHUẨN BỊ: Giáo viên: - SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học Học sinh: Vở ghi, SGK, Đọc trước “Làm việc với dãy số” III CÁC HOẠT ĐỘNG DẠY-HỌC: Ổn định tổ chức lớp: (1’) -Kiểm tra sĩ số: 8A3 8A4 8A5 Kiểm tra cũ: Lấy kết tập cho điểm kiểm tra thực hành 15 phút Bài mới: (40’) Hoạt động giáo viên Hoạt động học sinh Kiến thức ghi bảng Hoạt động 1: ôn tậ lý thuyêt (20’) - Cấu trúc khai báo -Gv: Cho học sinh lên bảng - HS trả lời biến: trả lời viết cấu trúc cú pháp Var Tên mảng : array[ ] of Gv: Hướng dẫn học sinh * Trong đó: làm tập sửa lỗi + Tên mảng người dùng đặt + Chỉ số đầu số Cuối hai số nguyên biểu thức nguyên thoả mãn số đầu≤ số Cuối + Kiểu liệu integer real Hoạt động 2: Thực hành ví dụ 5(21’) Bài SGK: Viết Gv: Cho hs đọc tập Học sinh: chia nhóm thực hành chương trình Pascal sử trả lời Chương trình sau: dụng biến mảng để Program tb; nhập từ bàn phím Uses crt; phần tử dãy var N, i: integer; tb: real; số Độ dài dãy A: array[1 100] of real; nhập từ bàn begin phím Tính giá trị write('Nhap so phan tu Câua trung bình cho dãy số mang’); nhập vào readln(n); for i:=1 to n write('a[‘,I,']=’); readln(n); {tinh trung binh} Tb:=0 For i:=1 to n Tb:=(tb+a[i])/I; Writeln(‘trung bình day so là:’,tb); Readln; end Củng cố: (2’) - Cách khai báo mảng Pascal - Câu lệnh nhập dãy số từ bàn phím Hướng dẫn nhà: (1’) - Soạn thực hành sử dụng biến mảng chương trình IV Rút kinh nghiệm: Tuần 29 Tiết 38 Ngày soạn: 10/03/2018 Ngày dạy: 17/03/2018 Bài thực hành 7: XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH (t2) I MỤC TIÊU: Kiến thức: - Biết cách sử dụng biến mảng vào tốn Kỹ năng: - Ơn luyện cách khai báo mảng :array[1 100] of real; lệnh lặp if then, for do; - Củng cố kĩ đọc, hiểu chỉnh sửa chương trình - 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 Thái độ: HS có thái độ ham hiểu biết, học hỏi II CHUẨN BỊ: Giáo viên: - SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học Học sinh: Vở ghi, SGK, Đọc trước “Làm việc với dãy số” III CÁC HOẠT ĐỘNG DẠY-HỌC: Ổn định tổ chức lớp: (1’) -Kiểm tra sĩ số: 8A3 8A4 8A5 Kiểm tra cũ: kiểm tra quã trình thực hành Bài mới: (40’) Hoạt động giáo viên Hoạt động học sinh Hoạt động 1: tập (40’) Gv: Cho học sinh tìm hiểu HS chia nhóm làm thực hành Chương trình tìm giá trị nhỏ Nội dung chương trình: dãy số nguyên Program P_Min; P_Min ? Var i, n, Min : integer; A: array[1 100] of integer; Begin Gv: Hướng dẫn học sinh write('Hay nhap dai cua day so, N='); readln(n); làm tập sửa lỗi writeln('Nhap cac phan tu cua day so:'); For i:=1 to n Begin write('a[',i,']='); readln(a[i]); End; Min:=a[1]; Kiến thức ghi bảng Bài tập 1: Chương trình tìm giá trị nhỏ dãy số nguyên P_Min ? for i:=2 to n if Min>a[i] then Min:=a[i]; write('So nho nhat la Min =’, min); Readln; End Củng cố: (2’) - Cách khai báo mảng Pascal - Câu lệnh nhập dãy số từ bàn phím Hướng dẫn nhà: (1’) - Soạn tập thực hành sử dụng biến mảng chương trình IV Rút kinh nghiệm: ... chương trình IV Rút kinh nghiệm: Tuần 29 Tiết 38 Ngày soạn: 10/03/20 18 Ngày dạy: 17/03/20 18 Bài thực hành 7: XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH (t2) I MỤC TIÊU: Kiến... dãy số” III CÁC HOẠT ĐỘNG DẠY-HỌC: Ổn định tổ chức lớp: (1’) -Kiểm tra sĩ số: 8A3 8A4 8A5 Kiểm tra cũ: kiểm tra quã trình thực hành Bài mới: (40’) Hoạt... trung bình cho dãy số mang’); nhập vào readln(n); for i:=1 to n write(''a[‘,I,'']=’); readln(n); {tinh trung binh} Tb:=0 For i:=1 to n Tb:=(tb+a[i])/I; Writeln(‘trung bình day so là:’,tb); Readln;