Bài tập - tin 8- tuần 21

Bài: - tiết 39,40
Tuần dạy: 21
BÀI TẬP
1. MỤC TIÊU:
1.1. Kiến thức :
- HS biết:
Biết lệnh ghép trong Pascal.
- HS hiểu:
HS hiểu cú pháp của câu lệnh lặp với một số lần biết trước for ...do trong Pascal.
1.2. Kỉ năng:
- Viết được các chương trình đơn giản
- Viết đúng được lệnh for .. do trong một số tình huống đơn giản.
1.3. Thái độ:
Nghiêm thúc thúc thực hiện.
2. TRỌNG TÂM
Thực hành
3. CHUẨN BỊ :
3.1. Giáo viên: Phòng máy, chia cặp thực hành.
3.2. Học sinh : Kiến thức đã học. SGK, Đồ dùng học tập
4. TIẾN TRÌNH
4.1. Ổn định tổ chức và kiểm diện:
Lớp 8a1:
Lớp 8a2:
4.2. Kiểm tra miệng:
? Trình bày cú pháp câu lệnh lặp?
Tl: For := to do
4.3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG BÀI HỌC

Hoạt động 1: Xác định và chữa lỗi của câu lệnh:
Bài 5/SGK: Các câu lệnh sau có hợp lệ không ? Vì sao ?
HS suy nghĩ và làm vào nháp sau đó đại diện trả lời giáo viên
a) for i:= 100 to 1 do writeln(`A`);

b) for i:= 1.5 to 10.5 do writeln(`A`);

c) for i:= 1 to 10 do writeln(`A`);
d) for i:= 1 to 10 do; writeln(`A`);
e) var x: real; begin for x:=1 to 10 do writeln(`A`); end.

Bài 7.2/SBT/T58: Các câu lệnh sau đúng hay sai? Hãy chữa lỗi sai nếu có.
- HS làm vào nháp sau đó trình bày cách làm của mình.
(A) for i:= 1 to 10; do x:= x + 1;
(B) for i:= 10 to 1 do x:= x + 1;

(C) for i:= 1 to 10 do x:= x + 1;
(D) for i:= 1 to 10 for j:= 1 to 10 do
x:= x + 1;
(E) for i:= 1 to 10 do for j:= 1 to 10 do x:= x + 1;
Hoạt động 3: Viết chương trình:
Bài 6/SGK: Mô tả thuật toán và viết chương trình tính tổng sau đây:
- HS ghi chép đề bài.
A =
+
+
+ .... +

? Trình bày thuật toán của bài toán?






- GV yêu cầu HS viết chương trình sau đó gọi HS trình bày, GV cùng cả lớp chữa lại.


a) sai. vì dạng tiến thì giá trị đầu phải nhỏ hơn giá trị cuối.
b) sai. vì biến đém phải thuộc kiểu số nguyên.
c) đúng
d) sai. vì sau lệnh do không có dấu chấm phẩy
e) Sai. vì biến đếm ta phải khai báo kiểu số nguyên.

A. sai. Bỏ dấu ; sau số 10
B. Sai. To đổi thành downto
hoặc i:=1 to 10
C. đúng
D. Sai. bỏ for j:= 1 to 10

E. Sai. Bỏ j:= 1 to 10 do





B1: Nhập vào số n
B2: Gán A:= 0
B3: Cho vòng lặp chạy từ 1 đến n và thực hiện lệnh gán A:= A +

B4: In ra giá trị của A
B5: Kết thúc.
program tong;
uses crt;
Var n, i, A: Integer;
begin
writeln(`Nhap vao gia tri n = `); Readln(n);
A;= 0;
for i:= 1 to n do A:= A +
;
writeln(`Gia tri cuar A la: `, A);
Readln;
End.

4.4. Câu hỏi, bài tập củng cố :
- Câu 1 : Trình bày cú pháp của câu lệnh lặp với số lần biết trước ?
- Đáp án câu 1: For := to do ;
4.5. Hướng dẫn học sinh tự học:
- Đối với bài học ở tiết này :
Nắm chắc cú pháp của câu lệnh lặp.
Làm lại các bài tập trên
- Đối với bài học ở tiết tiếp theo:
Chuẩn bị cho hai tiết thực hành.
5. RÚT KINH NGHIỆM