Caâu 2: Voøng laëp while ..do laø voøng laëp: A Biết trước số lần lặp.. B Chưa biết trước số lần lặp.[r]
(1)PHßNG GI¸O DôC §µo t¹o l©m hµ Trường thcs tân hà Hä vµ tªn: KIÓM TRA häc k× II M«n:Tin Häc _ Thêi gian: 45 ‘ Líp6A: §iÓm Đề N¨m häc 2009-2010 Lêi phª cña thÇy gi¸o Đề bài: Phần 1: Trắc nghiệm Khoanh tròn chữ cái đứng trước kết đúng Câu 1: Câu lệnh pascal nào sau đây là hợp lệ? A) For i:=100 to writeln(‘A’); B) For i:=1.5 to 10.5 writeln(‘A’); C) For i= to 10 writeln(‘A’); D) For i:= to 10 writeln(‘A’); Caâu 2: Voøng laëp while laø voøng laëp: A) Biết trước số lần lặp B) Chưa biết trước số lần lặp C.) Biet tröôc so lan lap nhöng giôi han la <=100 D) Biet tröôc so lan lap nhöng giôi han la >=100 Câu 3: Câu lệnh lặp while…do có dạng đúng là: 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> <ñieàu kieän>; D) While <ñieàu kieän> <caâu leänh>; Câu 4: Cho S và i là biến nguyên Khi chạy đoạn chương trình : s:=0; for i:=1 to s := s+i; writeln(s); Keát quaû in leân maøn hình laø cuûa s laø : A.11 B 21 C 28 D.15 Caâu 5: Cho đoạn chương trình sau: x: = 0; tong:= 0; while tong <= 10 begin writeln(tong); tong:=tong+1 end; x:= tong; Sau đoạn chương trình trên, giá trị biến x bao nhiêu? A 10 B 11; C không xác định ; D Caâu 6: câu lệnh lặp: For i:=1 to begin…end; Câu lệnh ghép thực bao nhiêu lần? A không lần nào B lần C lần D lần Câu 7: Sau thực đoạn chương trình j:= 5; for i:= to j:=j+2; thì giá trị biến j là? a) 18 b) 16 c) 15 d)17 Câu 8: Để tính tổng S=1+3 + + … + n; em chọn đoạn lệnh: Lop7.net (2) a) for i:=1 to n if ( i mod 2)=0 then S:=S + 1/i; c) for i:=1 to n if ( i mod 2)=0 then S:=S + i; b) for i:=1 to n d) for i:=1 to n if ( i mod 2)=0 then S:=S + i if ( i mod 2) < > then S:=S + i; Else S:= S + I; Câu 9: Để 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 c) for i:=1 to n if ( i mod 2)=0 then S:=S +1/ i if ( i mod 2) < > then S:=S + i; Else S:=S-1/i; b) for i:=1 to n d)for i:=1 to n if ( i mod 2)=0 then S:=S – 1/i f ( i mod 2)=0 then S:=S + 1/i; Else S:= S + 1/i; Câu 10: Để tính tổng S=1+1/3 + 1/5 + … +1/ n; em chọn đoạn lệnh: a) for i:=1 to n c) for i:=1 to n if ( i mod 2)=1 then S:=S + 1/i; if ( i mod 2) =0 then S:=S + 1/i; b) for i:=1 to n d) for i:=1 to n if ( i mod 2)=0 then S:=S + 1/i if ( i mod 2)=0 then S:=S + i; Else S:= S + 1/; Câu 11: Để đếm có bao nhiêu số lẻ nhỏ hay n ; em chọn đoạn lệnh: a) for i:=1 to n c) for i:=1 to n if ( i mod 2)< >0 then S:=S + 1; if ( i mod 2) =0 then S:=S + 1; b) for i:=1 to n d) for i:=1 to n if ( i mod 2)=0 then S:=S + i ; if i mod 2=0 then S:=S + i; Câu 12: Để tính tổng S=1+2+3+ 4+ + … + n; em chọn đoạn lệnh: a) s:=0; i:=0; a) s:=0; i:=0; While i<=n While i<=n S:=S + 1; If (I mod 2)= Then S:=S + i; b) s:=0; i:=0; d) s:=0; i:=0; While i<=n While i<=n begin begin S:=S + i; if (i mod2)=1 Then S:=S + i; I:=i+1; Else i:=i+1; End; End; Caâu 13: Caâu leänh naøo sau ñaây laëp voâ haïn laàn a) s:=5; i:=0; a) s:=5; i:=1; While i<=s While i<=s s:=s + 1; i:=i + 1; Lop7.net (3) b) s:=5; i:=1; While i> s i:=i + 1; d) s:=0; i:=0; While i<=n begin if (i mod2)=1 Then S:=S + i; Else i:=i+1; End; Caâu 14: 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; Câu 15: Lần lượt thực đoạn lệnh: a[1]:=5 a[2]:=3; t:=a[1]+a[2]+10; Giaù trò cuûa t laø a) 10 b) 15 c)18 d) 20 Lop7.net (4)