Câu 1: Hãy cho biết tác dụng của câu lệnh lặp với số lần biết trớc?. Câu 2: Các câu lệnh Pascal sau đây đợc viết đúng hay sai?. if x>5 then; a:=b; Câu 3: Hãy phát biểu sự khác biệt giữa
Trang 1Trờng THCS Sơn Tiến
Họ và tên:………
Lớp:………
Ngày …tháng 02 năm 2009. Kiểm tra lý thuyết Môn: Tin học Thời gian: 45 phút. Điểm Lời phê của giáo viên. Đề Bài Câu 1: Hãy cho biết tác dụng của câu lệnh lặp với số lần biết trớc? Câu 2: Các câu lệnh Pascal sau đây đợc viết đúng hay sai? a if x:=7 then a=b; b if x>5; then a:=b; c if x>5 then; a:=b; Câu 3: Hãy phát biểu sự khác biệt giữa các câu lệnh lặp với số lần lặp cho trớc và câu lệnh lặp với số lần lặp cha biết trớc Câu 4: Ngời ta đã chứng minh rằng các tổng sau đây 1 2 3 1 1 1 1 1 1 1 1 1 , , , ,
2 2 3 2 3 4 n 2 3 1 T T T T n luôn luôn tăng (có thể lớn hơn một số bất kì), mặc dù chỉ cộng thêm một số rất nhỏ ở mỗi b-ớc.Viết chơng trình nhập số thực A và tìm số tự nhiên nhỏ nhất N sao cho 1 + 1/2 + 1/3 +
+ 1/N >A. Bài Làm:
Đáp án và thang điểm.
Câu 1: (1 đ)
Câu lệnh lặp có tác dụng làm đơn giản và giảm nhẹ công sức của ngời viết chơng trình!
Câu 2: (2 đ)
a) Sai (thừa dấu hai chấm);
b) Sai (thừa dấu chấm phảy thứ nhất);
Trang 2Câu 3: (3 đ)
Sự khác biệt giữa câu lệnh lặp với số lần lặp cho trớc và câu lệnh lặp với số lần lặp cha biết trớc là ở các điểm sau đây:
+) Nh tên gọi của nó, câu lệnh lặp với số lần lặp cho trớc chỉ thị cho máy tính thực hiện một lệnh hoặc một nhóm lệnh với số lần đã đợc xác định từ trớc, còn với câu lệnh lặp với số lần lặp cha biết trớc thì số lần lặp cha đợc xác định trớc
+) Trong câu lệnh lặp với số lần cho trớc, điều kiện là giá trị của một biến đếm có giá trị nguyên đã đạt đợc giá trị lớn nhất hay cha, còn trong câu lệnh lặp với số lần lặp cha biết trớc,
điều kiện tổng quát hơn nhiều, có thể là kiểm tra một giá trị của một số thực, cũng có thể là một điều kiện tổng quát khác
+) Trong câu lệnh lặp với số lần cho trớc, câu lệnh đợc thực hiện ít nhất một lần, sau đó kiểm
tra điều kiện Trong câu lệnh lặp với số lần cha xác định trớc, trớc hết điều kiện đợc kiểm tra
Nếu điều kiện đợc thỏa mãn, câu lệnh mới đợc thực hiện Do đó có thể có trờng hợp câu lệnh
hoàn toàn không đợc thực hiện
Câu 4: (4 đ)
Chơng trình có thể nh sau:
Uses CRT;
Var A, sum: real;
i: integer;
Begin
Write('cho so A: '); readln(A);
i:=1; sum:= 0;
While (sum<=A) do
Begin
sum:= sum+1/i;
i:= i+1;
end;
Write('Gia tri N bang ', i:6);
Readln;
End.