Giáo án Tin học 8 tiết 41: Bài thực hành 5: sử dụng lệnh lặp for ...do

Ngày soạn: 09/01/2010
Ngày dạy: 13/01/2010
 Tiết: 41: 
Bài thực hành 5: Sử dụng lệnh lặp for ...do
I. Mục tiêu: 	
1. Kiến thức Vận dụng kiến thức của vòng lặp for... do, câu lệnh ghép để viết chương trình.
2. Kỹ năng. 
Viết được chương trình có sử dụng vòng lặp for ... do;
Sử dụng đợc câu lệnh ghép;
Rèn luyện kỹ năng đọc hiểu chương trình có sử dụng vòng lặp for .... do.
3. Thái độ: Thái độ học tập nghiêm túc, tích cực làm các bài tập thực hành.
III. chuẩn bị của GV, HS 
1. Chuẩn bị của GV: - Giáo án, SGK, phòng máy, phần mềm pascal
2. Chuẩn bị của HS: - SGK, vở ghi, bút,nghiên cứu trước bài
IV. Tiến Trình lên lớp:
hoạt động 1: Kiểm tra bài cũ. Kiểm tra bài tập đã cho về nhà.
Vào bài mới: Chúng ta đã nghiên cứu lý thuyết về vòng lặp for ... do. để biết vòng lặp chạy như thế nào thì hôm nay chúng ta cùng nhau đi vào tiết thực hành. Giáo viên ghi tên bài học lên bảng.
Hoạt động của giáo viên
HĐ của HS
Ghi bảng
Hoạt động 2: Viết chương trình cho các bài tập đã cho về nhà. 
GV: yêu cầu mỗi dãy gõ một bài vào máy (10’)
GV: hỗ trợ học sinh trong quá trình thực hành.
Sau khi kết quả chạy chương trình đã đúng, gv yêu cầu học sinh chữa bài của mình đã làm ở nhà cho đúng theo chương trình đã chạy.
- HS: gõ chương trình, chạy thử chương trình, và báo cáo kết quả.
 Bài 1: Tính tổng của n số tự nhiên đầu tiên
Program tinh_tong;
Uses crt;
Var i, n: integer; tong: longin;
Begin
Clrscr;
Tong:=0;
Writeln(‘Nhap vao so n’); readln(n);
For i:=1 to n do
Tong: = Tong+i;
Writeln(‘Tong của’, n,’so tu nhien dau tien la’,tong); 
Readln;
End.
2. Viết chương trình tìm xem có bao nhiêu số dương trong n số nhập vào từ bàn phím
Program tinh_so_cac_so_duong;
Uses crt;
Var i,A, dem, n: integer; 
Begin
Clrscr;
Dem:=0;
Writeln(‘Nhap vao so n’); readln(n);
For i:=1 to n do 
begin
writeln(‘nhap vao so thu’,i); readln(A);
if A>0 then dem:=dem+1;
end;
Writeln(‘So cac so duong la’,dem); 
Readln;
End.
Hoạt động 3: Bảng cửu chương
GV: Đưa ra nội dung của bài toán.
GV: đưa nội dung chương trình lên màn hình, yêu cầu học sinh đọc hiểu chương trình.
động của chương trình.
GV: yêu cầu một học sinh đứng tại vị trí trình bày hoạt động của chương trình, các nhóm khác cùng tham gia phân tích.
GV: yêu cầu học sinh lập bảng hoạt động của chương trình theo mẫu:
Giả sử N=2:
GV: nhận xét.
GV: cho chương trình chạy trên máy, yêu cầu học sinh quan sát kết quả.
HS: Nghiên cứu bài toán, tìm input và output.
HS: đọc, phân tích câu lệnh tìm hiểu hoạt
HS: tham gia hoạt động của giáo viên
HS: các nhóm lập bảng và đại diện nhóm báo cáo kết quả.
Bài 2: Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, và dừng màn hình để có thể quan sát kết quả.
Program Bang_cuu_chuong;
Uses crt;
Var i, n: integer;
Begin
Clrscr;
Writeln(‘Nhap vao so n’); readln(n);
Writeln(‘Bang nha’,n);
Writeln;
For i:=1 to 10 do
Writeln(n,’x’,i:2,’=’,n*i:3); 
Readln;
End.
Giả sử N=2:
Bước
i
i<=10
Writeln(n,’.’,i,’=’,n*i)
1
1
đúng
2.1=2
Hoạt động 4: củng cố và dặn dò.
Nhận xét, rút kinh nghiệm tiết thực hành
V. Rút kinh nhiệm: