Giáo án Tin học Lớp 8 - Tiết 59: Bài thực hành 7: Xử lí dãy số trong chương trình - Năm học 2013-2014

TuÇn 31
TiÕt: 59 
Ngày dạy:01/04/2013 
Bài thực hành 7
Xử lí dãy số trong chương trình
1. Mục tiêu:
1.1 Kiến thức
Hoïc sinh bieát: Làm quen với việc khai báo và sử dụng các biến mảng 
Học sinh hieåu: Biết cách khai báo mảng, nhập, in, truy cập các phần tử của mảng
1.2 Kĩ năng
HS thành thạo: Ôn luyện cách sử dụng câu lệnh lặp fordo 
Học sinh thực hiện thành thạo: các kĩ năng đọc, hiểu và chỉnh sửa chương trình.
1.3 Thái độ
- Thói quen: Thái độ nghiêm túc cẩn thận.
- Tính cách : châm chỉ
2. Nội dung học tập
	Bài tập.
3. Chuẩn bị: 
3.1 Gv: Tài liệu tin lớp 8
3.2 HS: SGK tin 8, vë ghi
4. Tổ chức các hoạt động học tập	
4.1. æn ®Þnh tæ chøc và kiểm diện
- ổn định lớp.
- kiểm diện học sinh.
 4.2. kiểm tra miệng: không.
 4.3. Tiến trình bài học
Hoạt động 1:. Bài tập.
Mục tiêu:
kiến thức: các câu lệnh.
kĩ năng: HS biết nhiều sửa các bài tập.
Phương pháp, phương tiện dạy học
phương pháp: Đàm thoại – vấn đáp.
phương tiện: máy tính.
Các bước của hoạt động:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG BÀI HỌC
GV: Đưa ra bài tập 1 SGK
? Gọi học sinh nêu ý tưởng
- GV hướng dẫn
HS: Làm bài tập
Bài 1. Viết chương trình nhập điểm của các bạn trong lớp. Sau đó in ra màn hình số bạn đạt kết quả học tập loại giỏi, khá, trung bình và kém (theo tiêu chuẩn từ 8.0 trở lên đạt loại giỏi, từ 6.5 đến 7.9 đạt loại khá, từ 5.0 đến 6.4 đạt trung bình và dưới 5.0 xếp loại kém).
a) Xem lại các ví dụ 2 và ví dụ 3, bài 9 về cách sử dụng và khai báo biến mảng trong Pascal.
b) Liệt kê các biến dự định sẽ sử dụng trong chương trình. Tìm hiểu phần khai báo dưới đây và tìm hiểu tác dụng của từng biến:
program Phanloai;
uses crt;
Var
 i, n, Gioi, Kha, Trungbinh, Kem: integer;
 A: array[1..100] of real;
Gõ phần khai báo trên vào máy tính và lưu tệp với tên Phanloai. Tìm hiểu các câu lệnh trong phần thân chương trình dưới đây:
Begin
clrscr;
write(‘Nhap so cac ban trong lop, n = ‘); readln(n);
writeln(‘Nhap diem:’);
For i:=1 to n do Begin write(i,’. ‘); readln(a[i]); End;
Gioi:=0; Kha:=0; Trungbinh:=0; Kem:=0;
for i:=1 to n do
 begin 
if a[i]>=8.0 then Gioi:=Gioi+1;
if a[i]<5 then Kem:=Kem+1;
if (a[i]=6.5) then Kha:=Kha+1;
if (a[i]>=5) and (a[i]<6.5) then Trungbinh:=trungbinh+1
 end;
writeln(‘Ket qua hoc tap:’);
writeln(Gioi,’ ban hoc gioi’);
writeln(Kha,’ ban hoc kha’);
writeln(Trungbinh,’ ban hoc trung binh’);
writeln(Kem,’ ban hoc kem’);
readln
End.
d) Gõ tiếp phần chương trình này vào máy tính sau phần khai báo. Dịch, chạy chương trình.
5. Tổng kết và hướng dẫn học tập
	5.1 Tổng kết.
	5.1 Hướng dẫn học tập
	- Đối với bài học ở tiết học này:
	+ HS biết sử dụng các câu lệnh.
	- Đối với bài học ở tiết học sau:
	+ sử dụng thành thạo các câu lệnh.
6. phụ lục.