Trờng THCS Sơn Tiến Giáo viên: Phạm Tuấn Anh.
Dy Lp: 8B; 8C; 8D. Ngày soạn: 05/04/2009.
Tit PPCT: 58. Ngày dạy: 07/04/2009.
Bi Thc Hnh 7. X lý dóy s trong chng trỡnh. (T2)
I. Mc tiờu:
- Giỳp hs khai bỏo v s dng cỏc bin mng.
- Giỳp Hs ụn luyn cỏch s dng cõu lnh r nhỏnh, lnh lp.
- Giỳp Hs cng c k nng c, hiu hiu chnh li trong chng trỡnh, chy
chng trỡnh v xem kt qu.
- Hiu v vit c chng trỡnh tham chiu n cỏc phn t trong mng,
nhp/xut cỏc phn t trong mng.
II. Chun b:
- Gv: phũng mỏy.
- Hs: bi tp thc hnh
III. Tin trỡnh lờn lp:
1. n nh lp:
2. Bi mi:
H ca GV H ca HS
-Gv: yờu cu hs tip tc thc hnh bi 2
sgk.
Bài 2. Bổ sung và chỉnh sửa chơng trình
trong bài 1 để nhập hai loại điểm Toán và
Ngữ văn của các bạn, sau đó in ra màn hình
điểm trung bình của mỗi bạn trong lớp (theo
công thức điểm trung bình = (điểm Toán +
điểm Ngữ văn)/2), điểm trung bình của cả
lớp theo từng môn Toán và Ngữ văn.
a) Tìm hiểu ý nghĩa của các câu lệnh sau
đây:
Phần khai báo:
Var

for i:=1 to n do
begin TbToan:=TbToan+DiemToan[i];
TbVan:=TbVan+DiemVan[i] end;
TbToan:=TbToan/n; TbVan:=TbVan/n;
writeln('Diem trung binh mon Toan:
',TbToan:3:2);
writeln('Diem trung binh mon Van:
',TbVan:3:2);
end.
b) Bổ sung các câu lệnh trên vào vị trí
thích hợp trong chơng trình. Thêm các
lệnh cần thiết, dịch và chạy chơng trình
với các số liệu thử.
3. Cng c:
Cú pháp khai báo biến mảng kiểu số nguyên và số thực trong Pascal có dạng:
+) Var <tên biến mảng>:array[<chỉ số đầu>..<chỉ số cuối>]of integer;
Var <tên biến mảng>: array[<chỉ số đầu>..<chỉ số cuối>] of real; trong đó chỉ số
đầu không lớn hơn chỉ số cuối.
+) Tham chiếu tới phần tử của mảng đợc xác định bằng cách:<tên biến mảng>[chỉ số]
4.Dn dũ:
- V nh xem li cỏc bi tp ó thc hnh. Nu hs no cú mỏy tớnh cỏ nhõn thỡ nờn
thao tỏc li nhiu ln cho thnh tho.
- Xem trc các bi tập tiết tip theo chữa bài tập.
Giáo án tin học lớp 8.
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: 07/04/2009.
Tiết PPCT: 59. Ngµy d¹y: 09/04/2009.
Bµi tËp.
Gi¸o ¸n tin häc líp 8.
Trờng THCS Sơn Tiến Giáo viên: Phạm Tuấn Anh.

dụng câu lệnh lặp để thay nhiều câu lệnh.
Ngoài ra chúng ta còn có thể lu trữ và xử lí
nhiều dữ liệu có nội dung liên quan đến
nhau một cách hiệu quả.
HS thực hiện:
3. Đáp án a) Sai. Phải thay dấu phảy bằng
hai dấu chấm;
b) và c) Sai, vì giá trị nhỏ nhất và lớn nhất
của chỉ số mảng phải là số nguyên;
d) Sai, vì giá trị đâu của chỉ số mảng phải
nhỏ hơn hoặc bằng chỉ số cuối;
e) Đúng.
Giáo án tin học lớp 8.
Trờng THCS Sơn Tiến Giáo viên: Phạm Tuấn Anh.
Hoạt động 2:
GV yêu nêu và yêu cầu HS làm các bài tập
sau:
4. Câu lệnh khai báo mảng sau đây có đợc
máy tính thực hiện không?
var N: integer;
A: array[1..N] of real;
5. Viết chơng trình Pascal sử dụng mảng để
nhập từ bàn phím các phần tử của một dãy
số. Độ dài của dãy cũng đợc nhập từ bàn
phím.
6. Đoạn chơng trình sau dùng để sắp xếp lại
dãy số đợc ghi trong mảng A[i], i = 1,2,...,
N, theo thứ tự tăng dần:
For i:=1 to N do
For j:=i to N do

Giáo án tin học lớp 8.