Tiết 57. Bài Thực Hành 7. Xử lý dãy số trong chương trình. (T1)

Trêng THCS S¬n TiÕn Gi¸o viªn: Ph¹m TuÊn Anh.

Dạy Lớp: 8B; 8C; 8D. Ngµy so¹n: 29/03/2009.

Tiết PPCT: 57. Ngµy d¹y: 02/04/2009.

Bài Thực Hành 7. Xử lý dãy số trong chương trình. (T1)

I. Mục tiêu:

- Giúp hs khai báo và sử dụng các biến mảng.

- Giúp Hs ôn luyện cách sử dụng câu lệnh rẽ nhánh, lệnh lặp.

- Giúp Hs cũng cố kỹ năng đọc, hiểu hiệu chỉnh lỗi trong chương trình, chạy

chương trình và xem kết quả.

- Hiểu và viết được chương trình tham chiếu đến các phần tử trong mảng,

nhập/xuất các phần tử trong mảng.

II. Chuẩn bị:

- Gv: phòng máy.

- Hs: bài tập thực hành

III. Tiến trình lên lớp:

Hoạt Động 1: Tiến trình thực hành

HĐ của GV HĐ của HS

- Giáo viên yêu cầu hs thực hành bài 1

trong sách giáo khoa.

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;

- Giáo viên theo dõi, hỗ trợ học sinh thực

hành.

- Giáo viên hướng dẫn thêm cho hs hiểu

Hs: thực hành bài 1.

Hs: thực hành.

Hs: lắng nghe và thực hành.

Hs: thực hành.

Hs: Trả lời.

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

Gi¸o ¸n tin häc líp 8.