Bài kiểm tra 15 môn Tin học Lớp 11 - Trường THPT Trần Nhân Tông

doc 2 trang thungat 1520
Bạn đang xem tài liệu "Bài kiểm tra 15 môn Tin học Lớp 11 - Trường THPT Trần Nhân Tông", để tải tài liệu gốc về máy bạn click vào nút DOWNLOAD ở trên

Tài liệu đính kèm:

  • docbai_kiem_tra_15_mon_tin_hoc_lop_11_truong_thpt_tran_nhan_ton.doc

Nội dung text: Bài kiểm tra 15 môn Tin học Lớp 11 - Trường THPT Trần Nhân Tông

  1. Violet Bài kiểm tra Sở GD & ĐT Hải Phòng Môn: Tin học 11 – Trắc nghiệm Trường THPT Trần Nhân Tông Thời gian: 15 phút Bộ Môn Tin Học Đề gồm 01 trang – số câu hỏi 10 câu Họ và tên: Lớp: TRẮC NGHIỆM KIỂU XÂU: Hóy chọn một cõu trả lời thớch hợp nhất Cõu 1: Cho biến SS kiểu lụgic. Lệnh nào làm SS cú giỏ trị TRUE : a) SS := 'a' < 'A'; b) SS := 'A' = 'a'; c) SS := 'an' < 'a'; d) SS := 'PASCAL' < 'pascal'; Cõu 2: Cho khai bỏo : Var Ho, ten : String[15]; -Lệnh nào sai : a) Write('Ho ten la : ' ; Ho ; Ten); b) Write('Ho ten la : ' + Ho + Ten); c) Write('Ho ten la : ', Ho , Ten); d) Write('Ho ten la : ', Ho + Ten); Cõu 3: Cho khai bỏo : Var Chuoi : string[10]; x : real; -Lệnh nào đỳng : a) Chuoi := Str(x:5:2) ; b) Str(x:5:2, Chuoi); c) Chuoi := x ; d) x := Chuoi ; Cõu 4: Cho St là biến chuỗi, sau khi thực hiện hai lệnh : St:= Copy( 'PASCAL VERSION 5.5' , 8, 7) ; Write(St); -Kết qủa in lờn màn hỡnh là: a)VERSION 5.5 b) VERSION c) PASCAL d) 5.5 Cõu 5: Cho St là biến chuỗi, sau khi thực hiện bốn lệnh: St:=’ABCDEF’; Delete(St, 3, 2); Insert(‘XYZ’, St, 2); Write(St); -Kết qủa in lờn màn hỡnh là: a) ABXYZEF b) AXYZBCDEF c) AXYZ d) AXYZBEF Cõu 6: Cho i và x là hai biến kiểu nguyờn. Khi thực hiện lệnh : VAL('1234', x, i); -Gớa trị của x và i là bao nhiờu : a) x = 0 , i = 1234 b) x = 1234 , i = 4 c) x = 1234 , i = 0 d) x = 0 , i = 0 Cõu 7: Cho cỏc biến St chuỗi và k nguyờn. Sau khi gỏn: St:='Sinh vien Tin hoc hoc Tin hoc'; k := Pos('Tin', ST) ; -Giỏ trị của k là : a) k=13 b) k=11 c) k=26 d) k=23
  2. Cõu 8: Khi chạy chương trỡnh : Var St : string; i, L : integer; Begin St :='Hoc thay khong tay hoc ban’; L:=Length(St); For i := 1 to L do If (St[i] >= 'a') and (St[i] <= 'z') then St[i]:= Upcase (St[i]); Write (St); End. -Chương trỡnh in ra : a) Hoc Thay Khong Tay Hoc Ban b) hoc thay khong tay hoc ban c) Hoc thay khong tay hoc ban d) HOC THAY KHONG TAY HOC BAN Cõu 9: Khi chạy chương trỡnh : Var St : String; i,L : integer; Begin St:='ABCD'; L := Length(St); For i:= L Downto 1 do write (St[i]); End. -Chương trỡnh in ra : a) DCAB b) ABCD c) 4321 d) DCBA Cõu 10: Cho St là biến chuỗi và St:=’AAABAAB’; Sau khi thực hiện hai lệnh : While St[1]=’A’ do Delete(St,1,1); Write(St); Kết qủa in ra là: a) AABAAB b) BAAB c) BB d) AAA