KIỂM TRA 15 PHÚT
Môn: Tin học Lớp 8
I. TRẮC NGHIỆM (6 ®iÓm)
C©u 1. While a lµ mét d¹ng c©u lÖnh g×?
A. C©u lÖnh ®iÒu kiÖn B. LÖnh lÆp víi sè lÇn cha 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 2. Có ph¸p cña c©u lÖnh lÆp for… do… lµ?
A. If <®iÒu kiÖn> then ;
B. For <biÕn ®Õm>:= to do
C. Var n, i:interger;
D. For <®iÒu kiÖn> 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 cha 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);
Câu 11: Lệnh lặp nào sau đây là đúng :
-
For to
-
For to
-
While <điều kiện> = do
-
While <điều kiện> := do
Câu 12: Ta có biến het_luong=’T’. Vậy khai báo nào sau đây là đúng?
-
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ố vòng lặp:……….
Ý nghĩa:…………..................
……………………………….
……………………………….
……………………………….
……………………………….
|
|
S<5?
|
i:=i+1;
S:=S+i;
|
|
0<5 Đ
|
i=1, S= 1
|
|
…< 5….
|
………………..
|
|
…< 5…..
|
………………..
|
|
…< 5…..
|
………………..
|
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 ¸n
|
B
|
B
|
A
|
A
|
A
|
C
|
C
|
D
|
C
|
D
|
B
|
A
|
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ố vòng lặp:3
Ý nghĩa: Tính tổng
S= 1+2.. đến khi nào S>= 5 thì dừng vòng lặp. (1đ)
|
|
S<5?
|
i:=i+1;
S:=S+i;
|
|
0< 5 Đ
|
i=1, S= 1
|
|
1< 5 Đ
|
i=2, S= 3(0.25đ)
|
|
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
