ĐỀ KIỂM TRA 1 TIẾT Thời gian: 45 phút không kể thời gian giao phát đề.[r]
(1)Trường THCS Đoàn Giỏi-Năm học: 2009-2010 Phòng GD& ĐT Châu Thành Trường THCS Đoàn Giỏi GV: Phaïm Taán Phaùt ĐỀ KIỂM TRA TIẾT Thời gian: 45 phút (không kể thời gian giao phát đề) A./ Trắc nghiệm: (4 điểm) Câu 1: (2,0 điểm) Câu lệnh lặp với số lần xác định viết sai cú pháp không lặp lần nào, hãy sửa lại câu lệnh sau trở thành câu lệnh đúng ? a./ For i=1 to 25.5 A:=A*i; b./ For i=15 to 15 A=A+ i; c./ var i, x: real; Begin x:=0; For i:=7 to x:=x + i/2; end d./ For i:=100 to S:=S+i; Câu 2: (0,5 điểm) Câu lệnh lặp với số lần chưa biết trước viết sai gây lỗi lặp vô hạn lần, hãy sửa câu lệnh cách thêm begin… end; vào chổ thích hợp để có câu lệnh đúng? S:=0; n:=0; While S<=10 n:=n+1; S:=S+n; Câu 3: (0,5 điểm) Cho biết số lần lặp đoạn chương trình sau ? k:=0; For j:=7 to 19 k:=k+2; a./ 19 lần lặp c./ 13 lần lặp b./ 12 lần lặp d./ lần lặp Câu 4: (1,0 điểm) Hãy lỗi các câu lệnh sau đây, sửa lại thành câu lệnh đúng a./ X:=10; while X :=10 X=X+5; b./ S:=10; i:=5; while i<=10 S:=S+i; i:=i+1; B./ Tự luận: (6 điểm) Câu (1,5 điểm): Viết câu lệnh lặp với số lần xác định ? Áp dụng tính số lần lặp đoạn chương trình sau ? Tong:=0; For k:= 15 to 29 Tong:=Tong +k; Câu (1,0 điểm): Viết câu lệnh lặp với số lần không xác định ? Câu (1,5 điểm): Chạy bước câu lệnh lặp với số lần xác định đoạn chương trình sau, xác định giá trị biến A sau bước thực hiện? A:=55; For i:=6 to 10 A:=A + i*i; Câu (1,0 điểm): Chạy bước câu lệnh lặp, xác định số lần lặp và giá trị biến S thực xong đoạn chương trình sau ? S:=0; i;=1;n:=6; while (i<=n) begin if (n mod i=0) then S:=S+i; i:=i+1; end; Câu (1,0 điểm): Chạy bước câu lệnh lặp với số lần chưa xác định đoạn chương trình sau, xác định giá trị biến m và n sau bước thực ? m:=2; n:=10; While m<n begin m:=m*m; n:=n*2 end; Trang Lop8.net (2)