III. Tiền trình tiết dạy:
3. Nhận xét và dặn dò cuối buổi thực hành.
Tuần 25 tiết 33
Ngày soạn:12/02/2011 Ngày dạy: 15/02/2011.
Bài dạy: ÔN TẬP CHƯƠNG IV (tiết 1)
I. Mục tiêu:
1. Kiến thức
- Ôn tập lại kiến thức của chương cho học sinh
2. Kĩ năng
- Rèn luyện kỹ năng viết chương trình.
4. Thái độ
- Xây dựng lòng ham thích lập trình nhằm giải quyết các bài toán bằng máy tính.
II. Đồ dùng dạy học
SGK + Giáo án + phòng máy
III. Tiến trình tiết dạy:
5. Ổn định lớp. 6. Bài mới
Hoạt động của Giáo viên và học sinh Nội dung
Giáo viên nêu bài toán Hs ghi bài
Gv: xác định Input, Output của bài toán? Hs: trả lời câu hỏi
Gv: nêu cú pháp khai báo mảng 1 chiều? Hs: trả lời câu hỏi
Gv yêu cầu hs khai báo mảng A gồm N (n ≤ 100) số nguyên
Gv gọi 1 hs lên bảng khai báo Hs lên bảng khai báo mảng A
Gv: Phép toán kiểm tra tính lẻ của 1 số? Hs: trả lời câu hỏi
Gv yêu cầu 1 hs lên bảng viết chương trình. Hs lên bảng viết chương trình
Gv yêu cầu hs khác nhận xét Gv sửa bài, đánh giá và cho điểm. Gv nêu bài toán
Hs ghi bài
Gv: xác định Input, Output của bài toán? Hs: trả lời câu hỏi
Bài toán 1: Viết chương trình tạo mảng A gồm N (n ≤ 100) số nguyên, in ra màn hình các số nguyên lẻ.
Program Bt1;
Uses crt;
Var A: array[1..10] of byte; i, n: byte;
BEGIN
Write(‘Moi nhap so phan tu cua mang:’); readln(n); for i:=1 to n do BEGIN write(‘A[‘,i,’]=’); readln(A[i]); end; for i:=1 to n do
if A[i] mod 2 = 1 then write(A[i]:3); readln;
End.
Bài toán 2: Viết chương trình tạo mảng A gồm N (n ≤ 100) số nguyên, tính giá trị trung bình các phần tử và in kết quả ra màn hình.
Gv: tính giá trị trung bình của n phần tử? Hs: trả lời câu hỏi
Gv yêu cầu 1 hs lên bảng viết chương trình. Hs lên bảng viết chương trình
Gv yêu cầu hs khác nhận xét Gv sửa bài, đánh giá và cho điểm.
Uses crt;
Var A: array[1..10] of byte; i, n, S: byte;
tb: real;
BEGIN
Write(‘Moi nhap so phan tu cua mang:’); readln(n); for i:=1 to n do BEGIN write(‘A[‘,i,’]=’); readln(A[i]); end; for i:=1 to n do BEGIN S:=S + A[i]; Tb:= S/n; Eønd;
Write(‘gia tri trung binh cua mang la tb=’, tb:6:2);
readln;
End.
7. Củng cố:
- Cách khai báo, nhập/xuất dữ liệu cho mảng.
- Xác định input, output của bài toán -> ý tưởng -> viết chương trình - Xem lại nội dung bài học
8. Dặn dò:
Bài 10/ sgk tr80:
- Khai báo xâu S không dài quá 100?
- Sử dụng biến dem để đếm chữ số xuất hiện trong xâu S: + For i:= 1 to length(S) do
+ Nếu (‘0’ <= S[i]) và (S[i] <= ‘9’) thì tăng biến dem
Tuần 26 tiết 34.
Ngày soạn:20/02/2011. Ngày dạy: 22/02/2011.