Phßng GD §T H¬ng S¬n Phßng GD §T H ¬ng S¬n §Ò Kh¶o s¸t gi¸o viªn THCS N¨m häc 2008 2009 m«n Tin häc Thêi gian lµm bµi 120 phót I Lựa chọn phương án đúng Câu 1 Trong ngôn ngữ lập trình Pascal câu lệnh[.]
Phòng GD - ĐT Hơng Sơn Đề Khảo sát giáo viên THCS Năm học 2008 - 2009 môn Tin học Thêi gian lµm bµi 120 -I Lựa chọn phương án Câu 1: Trong ngơn ngữ lập trình Pascal câu lệnh sau đúng: A If then else B If then ; else ; C If then else ; D If ; then else ; Câu 2: Trong ngơn ngữ lập trình Pascal, phát biểu sau với câu lệnh rẽ nhánh If…then…? A Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt hai dấu ngoặc đơn B Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End C Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End; D Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End Câu 3: Trong ngôn ngữ lập trình Pascal câu lệnh sau đúng: A If a=5 then a:=d+1; else a:=d+2; B If a=5 then a:=d+1else a:=d+2; C If a=5 then a=d+1; else a=d+2; D If a=5 then a:=d+1else a:=d+2 Câu 4: Trong ngôn ngữ lập trình Pascal câu lệnh sau đú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 D If a:=5 then begin a:=d+1; b:=2; end begin a:=d+1; b:=2; end; else a:=d+2; else a:=d+2; Câu 5: Trong ngôn ngữ Pascal, muốn kiểm tra đồng thời ba giá trị A, B, C có lớn hay không ta viết câu lệnh If cho nhất? A If A, B, C > 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 6: Trong ngôn ngữ Pascal, mặt cú pháp câu lệnh sau với cấu trúc lặp For có lệnh con? A For i:=1 to 100 a:=a-1; B For i:=1 to 100 do; a:=a-1; C For i:=1 to 100 a:=a-1 D For i:=1; to 100 a:=a-1; Câu 7: Trong lệnh lặp For…to…do Pascal, vòng lặp biến đếm thay đổi nào? A +1; B -1; C Một giá trị bất kì; D Một giá trị khác 0; Câu 8: Sau thực đoạn chương trình sau, giá trị biến a bao nhiêu? a:=2 ; for a:= to a:= a+1; A C B D Câu 9: Trong câu lệnh lặp for i:=1 to 10 begin…end; câu lệnh ghép thực lần (nói cách khác, vịng lặp thực hiện?) A Không lần B lần C 10 lần D lần Câu 10: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa hình kết gì? For i:=10 to write (i,’ ‘); A 10 C Đưa 10 dấu cách II Các câu lệnh Pascal sau có hợp lệ khơng? Vì sao? a) if a>b then max:=a; else max:=b; b) if a>b then max:=a else max:=b; c) for i:=1 to 10 for j:=1 to 10 x:=x+1; d) for i:=1 to 10 for i:=1 to 10 x:=x+1; B 10 D Không đưa kết III Hãy viết lại chương trình từ chương trình có lỗi sau: Program bang cuu chuong; var N,i:integer; begin clrscr; write('Nhap so N='); readln(N); writeln; writeln('Bang nhan ',N); writeln; for i:=10 to do; begin GotoXY(5,WhereY); writeln(N,' x ',i:2,' = ',N*i:3); end; readln end IV Hãy viết chương trình để giải toán sau : Bài 1: Nhập vào số nguyên a, b So sánh hai số Bài 2: Tính giá trị biểu thức 11 + 22 + 32 + ….+ n2, với N số nguyên dương nhập từ bàn phím V Thực chủ đề năm học "ứng dụng cơng nghệ thơng tin" Đồng chí nêu bước hướng dẫn học sinh lập đăng ký thành viên để giải toán qua mạng violet / PHÒNG-GD HƯƠNG SƠN ĐÁP ÁN BIỂU ĐIỂM CHẤM THI KHẢO SÁT GIÁO VIÊN NĂM HỌC 2008-2009 MÔN: TIN HỌC Câu 1: (2,5 điểm) Phần trắc nghiệm câu 0,25 điểm Câu C Câu C Câu B Câu C Câu B Câu A Câu A Câu C Câu C Câu 2: (2 điểm) Mỗi câu chọn đúng, giải thích đầy đủ 0,5 điểm Câu a, khơng hợp lệ trước else khơng có dấu ; Câu b, hợp lệ câu lệnh Câu c, khơng hợp lệ câu lệnh thiếu từ khố Câu d, hợp lệ câu lệnh Câu 3: (2 điểm) Chương trình sau: Program bangcuuchuong; uses crt; var N,i:integer; const where Y=3; begin clrscr; write(‘Nhap so N=’);readln(N); writeln; writeln(‘Bang nhan’,N); writeln; for i:=10 down to begin gotoXY(5,Y); writeln(N,’x’,i:2,’=’,N*i:3); end; readln end Câu 4: (2 điểm) viết điểm Bài 1: (1 điểm) program sosanh; uses crt; var a,b:interger; begin Câu 10 D clrscr; write(‘Nhap a:’);readln (a); write(‘Nhap b:’);readln (b); if a>b then writeln (‘a lon hon b’) else if a=b then writeln (‘a bang b’) else writeln(‘a be hon b’); readln; end Bài 2: (1 điểm) program Tong; uses crt; var S,i,n:interger; begin clrscr; write(‘Nhap n:’);readln (n); S=0; begin for i:=1 to n S:=S+i*i; end; writeln(‘Tong la:‘,S:3); readln; end Câu 5: (1,5 điểm) Hướng dẫn học sinh truy cập vào website: http:// www.violympic.vn Vào mục đăng ký thành viên làm theo hướng dẫn; nhập họ tên học sinh, tên đăng nhập (ít kí tự), mật khẩu, nhập lại mật lần 2, địa lớp, trường, quận (huyện), tỉnh, số điện thoại, nhập mật mã bảo vệ, chấp nhận điều khoản quy định website (có thể xem phần trợ giúp website) Chú ý học sinh đăng ký Họ tên, địa lớp, trường, quận, huyện, tỉnh thành ... i:=1 to 100 a:=a-1; B For i:=1 to 100 do; a:=a-1; C For i:=1 to 100 a:=a-1 D For i:=1; to 100 a:=a-1; Câu 7: Trong lệnh lặp For…to…do Pascal, vòng lặp biến đếm thay đổi nào? A +1; B -1 ; C Một giá... thành viên để giải toán qua mạng violet / PHÒNG -GD HƯƠNG SƠN ĐÁP ÁN BIỂU ĐIỂM CHẤM THI KHẢO SÁT GIÁO VIÊN NĂM HỌC 200 8-2 009 MÔN: TIN HỌC Câu 1: (2,5 điểm) Phần trắc nghiệm câu 0,25