Kiểm tra 15 phút môn Tin học Lớp 8 - Tiết 46 - Lê Thị Mỹ Ngọc

Nội dung text: Kiểm tra 15 phút môn Tin học Lớp 8 - Tiết 46 - Lê Thị Mỹ Ngọc

1. Tuần: 24 KIỂM TRA 15 PHÚT Tiết PPCT: 46 Môn: Tin học Lớp 8 I. TRẮC NGHIỆM (6 ®iÓm) C©u 1. While a then ; B. For := to do ; C. Var n, i:interger; D. For do ; C©u 3. Víi ng«n ng÷ lËp tr×nh Passcal c©u lÖnh lÆp for i:=1 to 10 do x:=x+1; th× biÕn ®Õm i ph¶i ®­îc khai b¸o lµ kiÓu d÷ liÖu A. Interger; B. real; C. string D. Char; C©u 4. Sè lÇn lÆp trong c©u lÖnh lÆp For := to do ; ta lu«n x¸c ®Þnh ®­îc vµ tÝnh b»ng c¸ch? A. Gi¸ trÞ cuèi - gi¸ trÞ ®Çu +1 B. Gi¸ trÞ cuèi + biÕn ®Õm +1 C. Gi¸ trÞ ®Çu + biÕn ®Õm -1 D. Gi¸ trÞ cuèi - gi¸ trÞ ®Çu -1 C©u 5. BiÕn ®Õm trong vßng lÆp For do khi thùc hiÖn mçi vßng lÆp, nã ®­îc t¨ng thªm lªn mÊy ®¬n vÞ? A. mét ®¬n vÞ B. hai ®¬n vÞ C. ba ®¬n vÞ D. bèn ®¬n vÞ C©u 6. For := to do ; lµ mét d¹ng c©u lÖnh A. C©u lÖnh ®iÒu kiÖn B. LÖnh lÆp víi sè lÇn ch­a biÕt tr­íc C. LÖnh lÆp víi sè lÇn biÕt tr­íc D. LÖnh lÆp v« h¹n lÇn C©u 7. Sau khi thùc hiÖn ®o¹n ch­¬ng tr×nh j:= 0; for i:= 1 to 3 do j:=j+2; th× gi¸ trÞ in ra mµn h×nh cña j lµ? A. 4 B. 6 C. 8 D.10 C©u 8. C¸c c©u lÖnh Pascal nµo sau ®©y hîp lÖ : 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’); Câu 9: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp biết trước ?: A. if then B. if then else C. for do D. while do Câu 10: Câu lệnh Pascal : While (3*5>=15) do Writeln (3*5); sẽ : A. In số 15 ra màn hình 3 lần. B. In số 15 ra màn hình 5 lần. C. Không thực hiện lệnh Writeln (3*5); D. Lặp vô hạn lần lệnh Writeln (3*5);
2. Câu 11: Lệnh lặp nào sau đây là đúng : A. For = to do ; B. For := to do ; C. While = do ; D. While := do ; Câu 12: Ta có biến het_luong=’T’. Vậy khai báo nào sau đây là đúng? A. Var het_luong: char; B. Var het_luong: Real; C. Var het_luong: integer; D. Var het_luong: char II. TỰ LUẬN (4 ®iÓm) Câu 1: Hãy điền vào chỗ trống để được một chương trình đúng: (2đ) Program tinh_tich; Var i: integer; s: .; Begin s:= ; for i:= 1 to 10 s:= s*1/i; writeln ('tich ', ); readln; End. Câu 2: Đoạn chương trình i:=0; S:=0; While S<5 do Begin i:=i+1; S=S+i; End; Cho biết với đoạn lệnh trên chương trình thực hiện bao nhiêu vòng lặp và ý nghĩa câu lệnh lặp bằng cách điền vào chỗ trống bên dưới: Khởi tạo: S<5? i:=i+1; Số vòng lặp: . S:=S+i; Ý nghĩa: 0<5 Đ i=1, S= 1 . < 5 . . < 5 . < 5 .
3. HƯỚNG DẪN CHẤM I. TRẮC NGHIỆM (6 ®iÓm) Mỗi ý ®óng được 0,5 ®iÓm C©u 1 2 3 4 5 6 7 8 9 10 11 12 §¸p B B A A A C C D C D B A ¸n II. TỰ LUẬN (6 ®iÓm) Câu 1: Hãy điền vào chỗ trống để được một chương trình đúng: (2đ) Program tinh_tich; Var i: integer; s: .; (integer) Begin s:= ; (0) for i:= 1 to 10 (do) s:= s*1/i; writeln ('tich ', ); (s:10:2) readln; End. Câu 2: Hãy điền vào chỗ trống (2đ) Khởi tạo: i:=0; S:=0; S = 5 thì 1< 5 Đ i=2, S= 3(0.25đ) dừng vòng lặp. (1đ) 2< 5 Đ (0.25đ) i=3, S= 5 (0.25đ) 5< 5 S (0.25đ) Kết thúc vòng lặp Duyệt của Tổ Trưởng Giáo viên bộ môn Nguyễn Thị Trà My Lê Thị Mỹ Ngọc