PHÒNG GD & ĐT THOẠI SƠN TRƯỜNG THCS VĨNH TRẠCH ĐỀ KIỂM TRA HỌC KỲ I – LỚP ĐỀ CHÍNH THỨC SBD:…………SỐ PHỊNG:…… NĂM HỌC: 2015 – 2016 MƠN: TIN HỌC Thời gian: ……phút ( Không kể thời gian phát đề ) ĐỀ B: I Trắc nghiệm Câu 1: Trong Pascal khai báo sau đúng? A Var a=real; B Var a:=real; C Var a: read; D const a=50; Câu 2: Hãy chọn phát biểu sai phát biểu sau đây: A Viết chương trình hướng dẫn máy tính thực cơng việc hay giải toán cụ thể B Khi thực chương trình, máy tính thực lệnh có chương trình cách khơng C Chương trình máy tính dãy lệnh mà máy tính hiểu thực D Chương trình dịch chương trình dùng để dịch chương trình viết ngơn ngữ bậc cao sang ngơn ngữ máy Câu 3: Trong Pascal, khai báo sau đúng? A Var tb: real; B x:= integer; C const x: real; D Var R = 30; Câu 4: Câu lệnh điều kiện dạng thiếu có dạng: A if ; then ; B if then; ; C if then ; D if < câu lệnh > then < điều kiện >; Câu 5: Trong pascal kiểu số nguyên là: A real B char C integer D string Câu 6: Biểu thức toán học (a2 + b)(1 + c)3 biểu diễn Pascal ? A (a*a + b)(1+c)(1 + c)(1 + c); B (a*a + b)*(1 + c)*(1 + c)*(1 + c); C (a.a + b)(1 + c)(1 + c)(1 + c); D (a2 + b)(1 + c)3; Câu 7: Trong cấu trúc chung chương trình Pascal gồm có phần: A Phần tên phần thân B Phần thân C Phần khai báo, phần thân D Phần tên chương trình phần khai báo Câu 8: Câu lệnh điều kiện dạng đủ có dạng: A if then else ; ThuVienDeThi.com B if ;then else ; C if then; else ; D if then ; else ; Câu 9: Câu lệnh lặp pascal có dạng: A for :=; to ; B for := to ; C for = to ; D for := to ; ; Câu 10: Các câu lệnh sau câu đúng? A If x:=2 then a=b; C If x>5 then a:=b; else m:=n; B If x>5; then a:=b; D If x>5 then a:=b else m:=n; Câu 11: Trong Pascal, giả sử x biến kiểu xâu Phép gán sau đúng? A x:=20.5 B x:= ‘Truong THCS’ C x:=30 D x:= Truong THCS Câu 12: Để chạy chương trình ta sử dụng tổ hợp nào? A Alt + F9 B Alt + F5 C Ctrl + F5 D Ctrl + F9 II Tự luận Câu 1: Hãy liệt kê lỗi có chương trình đây, sau sửa lại cho Progam GIAI_PHUONG_TRINH_BAC_NHAT; Uses crt; Var a,b,x : real; Bigin Clrscr; Writeln(‘GIAI PHUONG TRINH BAC NHAT : AX + B=0’); Writeln(‘ ‘); Write (‘Nhap a=’); readln(a); Write (‘Nhap b=’); readln(b); 10 If(a=0) then 11 If(b=0) then Writeln(‘Phuong trinh co vo so nghiem’) 12 Ese writeln(‘Phuong tring vo nghiem’) 13 Else Writeln(‘Phuong trinh co nghiem x=’,-b/a); 14 Raed 15 End Câu 2: Với câu lệnh sau giá trị biến x bao nhiêu, trước giá trị x 10? a if (5 mod 2) = then x:=x-1; b if x