- Về nhà học bài tiết sau làm bài tập tiếp
KIỂM TRA 1 TIẾT ( LT) I Mục tiêu:
I. Mục tiêu:
- Hệ thống lại một số kiến thức đã học.
- Biết sử dụng vòng lặp xác định và vòng lặp không xác định để viết chương trình.
II. Đề bài:
Câu 1: Em hãy nêu cú pháp và hoạt động của vòng lặp không xác định (3đ)
Câu 2: Em hãy nêu cú pháp và hoạt động của vòng lặp xác định (3đ)
Câu 3: Em hãy viết chương trình tính tổng các số tự nhiên từ 100 đến 1000 ( Sử dụng vòng lặp xác định và vòng lặp không xác định) (4 đ)
III. Đáp án:
Câu 1: Cú pháp và hoạt động của vòng lặp không xác định. * Cú pháp:
While <điều kiện> do <câu lênh>; * Hoạt động:
- B1. Kiểm tra điều kiện.
- B2. Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện câu lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại B1.
Câu 2: Cú pháp và hoạt động của vòng lặp xác định * Cú pháp:
For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>; * Hoạt động của vòng lặp:
- B1: biến đếm nhận giá trị đầu
- B2: Chương trình kiểm tra biểu thức điều kiện, nếu biểu thức điều kiện đúng thì thực hiện câu lệnh.
- B3: Biến đếm tự động tăng lên 1 đơn vị và quay lại B2.
- B4: Nếu biểu thức điều kiện nhận giá trị sai thì thoát ra khỏi vòng lặp. Câu 3. Viết chương trình tính tổng các số tự nhiên từ 100 đến 1000 * Vòng lặp xác định: Program tinh_tong; Var i, S: Integer; Begin For i:= 100 to 1000 do S:= S + i;
Wirteln(‘ tong cac so tu nhien tu 100 den 1000 la:’,S); Readln;
End.
* Vòng lặp không xác định: Program tinh_tong; Var i, S: Integer;
Begin i:= 100; S:= 0; While i > 1000 do S:= S + i; i:= i + 1;
Writeln(‘ Tong cac so tu nhien tu 100 den 1000 la:’,S); Readln;
Tuần: 29 Ngày soạn: 21/03/2011 Tiết: 56