đề thi HKII Tin 9_ 2009_TN

BỘ GIÁO DỤC VÀ ĐÀO TẠO ĐỀ THI TRẮC NGHIỆM MÔN Học kỳ II_tin học lớp 9 Thời gian làm bài: 45 phút; (20 câu trắc nghiệm) Mã đề thi TIN 9 Họ, tên thí sinh: Số báo danh: . Câu 1: Cho S và i là biến nguyên. Khi chạy đoạn chương trình : s:=0; for i:=1 to 5 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. 101 D. 15 Câu 2: Trong chương trình pascal sau đâ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 có giá trị là mấy A. 3 B. 5 C. 15 D. 10 Câu 3: Trong chương trình pascal sau đây: program hcn; var a, b :integer; s,cv :real ; begin a:= 10; b:= 5; s:= a*b ; cv:= (a +b ) * 2 ; writeln(‘dien tich hcn la:’ , s ); writeln( ‘chu vi hcn la : ‘ , cv ) ; readln; end. Biến s và cv có giá trị là mấy: A. s = 10 ; cv = 5 ; B. s= 30 ; cv = 50 ; C. s = 50 ; cv = 40 ; D. s = 50 ; cv = 30 ; Câu 4: cho chương trình sau: Var a,b : integer ; Begin A:=16 ; b:=8 ; 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=16 ;b = 8; B. a= 24 ; b= 8; C. a = 8 ; b =16; D. a =24 ; b =16; Trang 1/4 - Mã đề thi TIN 9 Câu 5: cho chương trình sau: program gptbn; var b, c : integer; x :real; begin b:= 5 ; c:= -10 ; if (b=0 ) and (c=0) then writeln( ‘ x có vô số nghiệm’ ); if (b =0 ) and (c <> 0) then writeln( ‘ x vô nghiệm ‘); if (b<> 0) and ( c<> 0 ) then writeln (‘ pt có nghiệm x= ‘ , - c/b); readln; end. Chương trình in ra màn hình A. x có vô số nghiệm ; B. x vô nghiệm ; C. pt có nghiệm x= - 2 D. pt có nghiệm x= 2; Câu 6: cho chương trình sau: program doigiatri; var x,y: integer; begin x:=10; y:=15 ; x:= x+ y ; y:= x – y; x := x – y; writeln ( ‘ x= ‘, x, ‘y=’ , y); readln; end. Chương trình in ra x, y có giá trị là mấy: A. x= 10 ;b= 15 B. x=25 ; y= 15; C. x= 25 ; b=10 D. x=15 ; y= 10; Câu 7: Để tính tổng S=1 + 2 +3 +4 … + n; em chọn đoạn lệnh: A. for i:=1 to n do if ( i mod 2)=0 then S:=S + i; B. for i:=1 to n do S:= S + i ; C. for i:=1 to n do if ( i mod 2)=1 then S:=S + i; D. for i:=1 to n do if ( i mod 2)<>0 then S:=S + i; Câu 8: Để tính tổng S=2 + 4 + 6 … + n; em chọn đoạn lệnh: A. for i:=1 to n do if ( i mod 2)=0 then S:=S + i; B. for i:=1 to n do S:= S + i ; C. for i:=1 to n do if ( i mod 2)=1 then S:=S + i; D. for i:=1 to n do if ( i mod 2)<>0 then S:=S + i; Câu 9: Để tính tổng S=1+1/2 +1/3 + 1/4 … 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; B. for i:=1 to n do if ( i mod 2)=0 then S:=S + i Else S:= S + I; Trang 2/4 - Mã đề thi TIN 9 C. for i:=1 to n do 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 10: 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. tất cả các kiểu trên đều được Câu 11: Lần lượt thực hiện câu lệnh for i:= 1 to 3.5 do writeln(i:3:1); sẽ viết ra màn hình? A. Thứ tự của biến đếm, chiếm 3 chỗ và lấy 1 chữ số sau phần thập phân B. Viết số 1 rồi viết số 3.5 C. Chỉ viết số 3.5 mà thôi D. Không thực hiện được vì giá trị của biến đếm có kiểu thứ tự là Real Câu 12: 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 là? A. 4 B. 6 C. 8 D. 10 Câu 13: Để tính tổng S=1+3 + 5 + … + 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; B. for i:=1 to n do if ( i mod 2)=0 then S:=S + i Else S:= S + I; C. for i:=1 to n do if ( i mod 2) < > 0 then S:=S + i; D. for i:=1 to n do if ( i mod 2)=0 then S:=S + i; Câu 14: Để 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; B. for i:=1 to n do if ( i mod 2)=0 then S:=S – 1/i Else S:= S + 1/i; C. for i:=1 to n do if ( i mod 2) < > 0 then S:=S + 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 15: Để 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 do if ( i mod 2)<>0 then S:=S + 1/i; B. for i:=1 to n do if ( i mod 2)=0 then S:=S + 1/i Else S:= S + 1/; C. for i:=1 to n do if ( i mod 2) =0 then S:=S + 1/i; D. for i:=1 to n do if ( i mod 2)=0 then S:=S + i; Câu 16: Để đếm có bao nhiêu số lẻ nhỏ hơn hay bằng n ; em chọn đoạn lệnh: A. for i:=1 to n do if ( i mod 2)< >0 then S:=S + 1; Trang 3/4 - Mã đề thi TIN 9 B. for i:=1 to n do if ( i mod 2)=0 then S:=S + i ; C. for i:=1 to n do if ( i mod 2) =0 then S:=S + 1; D. for i:=1 to n do if ( i mod 2)=0 then S:=S + i; Câu 17: Để tính tổng S=1+2+3+ 4+ 5 + … + n; em chọn đoạn lệnh: A. s:=0; i:=0; While i<=n do S:=S + 1; B. s:=0; i:=0; While i<=n do begin S:=S + i; I:=i+1; End; C. s:=0; i:=0; While i<=n do If (I mod 2)= 1 Then S:=S + i; D. s:=0; i:=0; While i<=n do begin if (i mod2)=1 Then S:=S + i; Else i:=i+1; End; Câu 18: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng: A. If a=5 then a:=d+1; b:=2 else a:=d+2; B. If a=5 then begin a:=d+1; b:=2; end; else a:=d+2; C. If a=5 then begin a:=d+1; b:=2; end else a:=d+2; D. If a:=5 then begin a:=d+1; b:=2; end; else a:=d+2; Câu 19: Trong ngôn ngữ Pascal, muốn kiểm tra đồng thời cả ba giá trị của A, B, C có cùng lớn hơn 0 hay không ta viết câu lệnh If thế nào cho đúng nhất? A. If A, B, C > 0 then… B. IF (A>0) and (B>0) and (C>0) then… C. IF A>0 and B>0 and c>0 then… D. IF (A>0) or (B>0) or (c>0) then… Câu 20: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì? For i:=10 downto 1 do write (i,’ ‘); A. 1 2 3 4 5 6 7 8 9 10 B. 10 9 8 7 6 5 4 3 2 1 C. Đưa ra 10 dấu cách D. Không đưa ra kết quả gì ----------------------------------------------- ----------- HẾT ---------- Trang 4/4 - Mã đề thi TIN 9 . GIÁO DỤC VÀ ĐÀO TẠO ĐỀ THI TRẮC NGHIỆM MÔN Học kỳ II _tin học lớp 9 Thời gian làm bài: 45 phút; (20 câu trắc nghiệm) Mã đề thi TIN 9 Họ, tên thí sinh: . 8; B. a= 24 ; b= 8; C. a = 8 ; b =16; D. a =24 ; b =16; Trang 1/4 - Mã đề thi TIN 9 Câu 5: cho chương trình sau: program gptbn; var b, c : integer; x :real;