Tin 8 Ki II

Trờng THCS việt cờng Bài kiểm tra chất lợng học kì IITiết:.. Lớp 8 .… I.Phần trắc nghiệm 4đ Khoanh troứn chửừ caựi ủửựng trửụực keỏt quaỷ ủuựng.. Caõu 1: Leọnh laởp naứo sau ủaõy laứ ủuự

Trờng THCS việt cờng Bài kiểm tra chất lợng học kì II

Tiết: Môn: … Tin học 8

(Thời gian 45 phút, không kể giao đề)

Họ và tên học sinh: ……… Lớp 8 …

I.Phần trắc nghiệm (4đ)

Khoanh troứn chửừ caựi ủửựng trửụực keỏt quaỷ ủuựng

Caõu 1: Leọnh laởp naứo sau ủaõy laứ ủuựng?

A For <bieỏn ủeỏm>= <giaự trũ ủaàu> to <giaự trũ cuoõớ> do <caõu leọnh>;

B For <bieỏn ủeỏm>:= <giaự trũ ủaàu> to <giaự trũ cuoõớ> do <caõu leọnh>;

C For <bieỏn ủeỏm>:= <giaự trũ cuoõớ> to <giaự trũ ủaàu> do <caõu leọnh>;

D For <bieỏn ủeỏm>: <giaự trũ ủaàu> to <caõu leọnh> do <giaự trũ cuoỏi>;

Caõu 2: Voứng laởp while do laứ voứng laởp:

A) Chửa bieỏt trửụực soỏ laàn laởp B) Bieỏt trửụực soỏ laàn laởp

C.) Bieỏt trửụực soỏ laàn laởp nhửng giụựi haùn laứ <=100 D) Bieỏt trửụực soỏ laàn laởp nhửng giụựi haùn laứ >=100

Caõu 3: Caõu leọnh laởp while…do coự daùng ủuựng laứ:

A) While <ủieàu kieọn> do; <caõu leọnh>; B) While <ủieàu kieọn> <caõu leọnh> do;

C) While <caõu leọnh> do <ủieàu kieọn>; D) While <ủieàu kieọn> do <caõu leọnh>;

Caõu 4: Cho S vaứ i laứ bieỏn nguyeõn Khi chaùy ủoaùn chửụng trỡnh :

s:=0;

for i:=1 to 5 do s := s+2;

writeln(s);

Keỏt quaỷ in leõn maứn hỡnh laứ cuỷa s laứ :

Caõu 5: Laàn lửụùt thửùc hieọn ủoaùn leọnh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1;

Giaự trũ cuỷa t laứ

A) t=1 B) t=2 C) t=3 D) t=6

Caõu 6: Caõu leọnh pascal naứo sau ủaõy laứ hụùp leọ?

A) For i:= 1 to 10 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:=100 to 1 do writeln(‘A’);

Caõu 7: Trong chửụng trỡnh pascal sau ủaõy:

Var x : integer ;

Begin

X:= 3 ;

If (45 mod 3) =0 then x:= x +2;

If x > 10 then x := x +10 ;

End

X coự giaự trũ laứ maỏy

a) 3 b) 5 c) 15 d)10

Caõu 8: Choùn khai baựo hụp leọ

a) Var a,b: array[1 n] of real; c) Var a,b: array[1:n] of real;

b) Var a,b: array[1 100] of real; d) Var a,b: array[1…n] of real;

II/

Tự luận (6 điểm)

Vieỏt chửụng trỡnh Pascal sửỷ duùng bieỏn maỷng ủeồ nhaọp tửứ baứn phớm caực phaàn tửỷ cuỷa moọt daừy soỏ và tìm số lớn nhất trong dãy số đó ẹoọ daứi cuỷa daừy cuừng ủửụùc nhaọp tửứ baứn phớm