Đề Thi HK II khối 8 - 9 năm học 2008-2009

KÌ THI HKII – MÔN TIN HỌC 8
Thời gian : 45 phút
TRƯỜNG
HỌ TÊN:
MÃ SỐ:
LỚP:
ĐIỂM:



SỐ CÂU ĐÚNG







PHIẾU TRẢ LỜI
Số thứ tự câu trả lời dưới đây ứng với số thứ tự câu trắc nghiệm trong đề. Đối với mỗi câu trắc nghiệm
01. ; / = ~ 04. ; / = ~ 07. ; / = ~ 10. ; / = ~
02. ; / = ~ 05. ; / = ~ 08. ; / = ~ 11. ; / = ~
03. ; / = ~ 06. ; / = ~ 09. ; / = ~ 12. ; / = ~
Phần 1: Chọn câu trả lời đúng nhất
Câu 1: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :
s:=1;
for i:=1 to 4 do s := s+i;
writeln(s);
Kết quả in lên màn hình là của s là :
a)11 b) 55 c) 15 d) 10
Câu 2: cho chương trình sau:
Var a,b : integer ;
Begin
a:=24 ; b:=12 ;
If a< b then a:= a + b else
Begin a:= a- b; b:= b + a end;
Writeln( ‘ a= ‘, a , ‘ b = ‘, b);
End.
Biến a và b có giá trị là mấy:
a) a=12 ;b = 24; b) a= 24 ; b= 36; c) a = 8 ; b =16; d) a =24 ; b =16;
Câu 3: Để tính tổng S=1 + 2 +3 +4 … + n; em chọn đoạn lệnh:
for i:=1 to n do
if ( i mod 2)=0 then S:=S + i;
for i:=1 to n do
S:= S + i ;
for i:=1 to n do
if ( i mod 2)=1 then S:=S + i;
for i:=1 to n do
if ( i mod 2)<>0 then S:=S + i;
Câu 4: Để tính tổng S=1-2 +3 - 4 … +/- n; em chọn đoạn lệnh:
for i:=1 to n do
if ( i mod 2)=0 then S:=S + i;
for i:=1 to n do
if ( i mod 2)=0 then S:=S + i Else S:= S + I;
for i:=1 to n do
if ( i mod 2)=1 then S:=S + i;
for i:=1 to n do
if ( i mod 2)<>0 then S:=S + i
Else S:=S-i;
Câu 5: Để tính tổng S=1/2+1/4 + 1/6 + … +1/ n; em chọn đoạn lệnh:

a) for i:=1 to n do
if ( i mod 2)=0 then S:=S + 1/i;
c) for i:=1 to n do
if ( i mod 2) < > 0 then S:=S + i;

b) for i:=1 to n do
if ( i mod 2)=0 then S:=S – 1/i Else S:= S + 1/i;
d) for i:=1 to n do
if ( i mod 2)=0 then S:=S +1/ i
Else S:=S-1/i;

Câu 6: Chọn khai báo hơp lệ

a) Const n=5;
Var a,b: array[1..n] of real;
c) Var n: real;
Var a,b: array[1:n] of real;

b) Var a,b: array[100..1] of real;
d) Var a,b: array[1...10] of real;

Câu 7: Lần lượt thực hiện đoạn lệnh: a[1]:=5; a[2]:=3; t:=(a[1]+a[2])*2+1; Giá trị của t là
a) t=8 b) t=17 c) t=10 d) t=6
Câu 8: Để đếm có bao nhiêu số lẻ nhỏ hơn hay bằng n ; em chọn đoạn lệnh:

a) for i:=