TRƯỜNG TRUNG HỌC CƠ SƠ 19.8 Họ tên:……………… Lớp: ……… Điểm: Lời phê giáo viên: ĐỀ KIỂM TRA HỌC KỲ II Năm học: 2014-2015 Môn: Tin Học Thời gian : 45 phút (Không kể thời gian giao đề) A.Trắc nghiệm: (5 điểm) I Hãy khoanh tròn vào lựa chọn câu sau: (3 điểm) Câu Trong tên sau đây, tên hợp lệ ngôn ngữ Pascal: a 8a; b Tamgiac; c Program; d Bai_tap; Câu Khi soạn thảo xong chương trình Pascal, ta muốn lưu chương trình lại ta nhấn phím: a F9 b Ctrl + F9 c F2 d Ctrl + F2 Câu Trong phần mềm Finger Break Out, để bắt đầu tham gia vào trị chơi ta nhấn phím nào? a Enter b OK c Space d Bất kì phím Câu 4.Những tên có ý nghĩa xác định từ trước khơng phép sử dụng cho mục đích khác gọi là: a Tên có sẵn b Tên riêng c Từ khoá d Biến Câu Phát biểu sau phát biểu sai? a Một chương trình phải đủ hai phần: Phần khai báo phần thân chương trình, phần thân chương trình phần bắt buộc phải có b Phần thân chương trình đặt vị trí chương trình c Phần khai báo có phải đặt trước phần thân chương trình d B,C sai Câu 6: Phần nguyên phép chia hai số nguyên 16 là: a 16 div = b 16 mod = c 16 div = d 16 mod = Câu Chương trình sau cho kết ? Program vd; Var a, b,: real; x,: integer ; Begin readln(a, b); If a>b then x:=a else x:=b; Write(x); End a xuất hình số nhỏ số a, b nhập b xuất hình số lớn số a, b nhập c chương trình không thực lỗi khai báo kiểu liệu d đảo giá trị biến a, b cho Câu 8: A khai báo biến với kiểu liệu số nguyên, X biến với kiểu liệu xâu Phép gán hợp lệ là: a A:= 4.5; b X:= ‘1234’; c X:= 57; d A:= ‘LamDong’; Câu 9:Với câu lệnh sau : IF a>8 THEN b:=3 ELSE b:=5; Khi a nhận giá trị b nhận giá trị nào? a b c d Câu 10: Câu lệnh sau dùng để nhập số từ bàn phím vào biến x? Giáo viên: Nguyễn Thị Ngọc Lý ThuVienDeThi.com a Writeln(‘Nhập x = ’); b Write(x); c Read(x) d Readln(x); Câu 11: Để chạy chương trình ta sử dụng tổ hợp nào? a Ctrl – F9 b Alt – F9 c F9 d Ctrl – Shitf – F9 Câu 12: Máy tính hiểu trực tiếp ngơn ngữ ngôn ngữ đây? a Ngôn ngữ tự nhiên b Ngơn ngữ lập trình c Ngơn ngữ máy d Tất ngôn ngữ … II Hãy liêt kê lỗi chương trình sau sửa lỗi lại cho (2 điểm) Program Chương-trình; Var a,b:Integer Begin a = 16; b =5.5; If a