TRƯỜNG THPT KIỂM TRA HỌC KÌ I TỔ KHOA HỌC TỰ NHIÊN Môn Tin học 11 (Thời gian 45 phút) Họ và tên Lớp 11A I PHẦN TRẮC NGHIỆM (6 diểm) Chọn phương án đúng và điền vào bảng ở phần bài làm Câu 1 Để khai bá[.]
TRƯỜNG THPT………………… TỔ KHOA HỌC TỰ NHIÊN KIỂM TRA HỌC KÌ I Mơn: Tin học 11 (Thời gian: 45 phút) Họ tên:……………… …………………………………Lớp: 11A………… I PHẦN TRẮC NGHIỆM: (6 diểm) Chọn phương án điền vào bảng phần làm: Câu 1: Để khai báo sử dụng thư viện phải dùng từ khóa nào? A Var B Uses C Const D Type Câu 2: Cú pháp khai báo cấu trúc lặp dạng tiến với số lần lặp biết trước: A for := to ; B for := to ; C for := downto ; D for := downto ; Câu 3: Cho đoạn CT: x:=2; y:=3; IF x > y THEN F:= 2*x – y ELSE IF x=y THEN F:= 2*x ELSE F:= x*x + y*y ; Sau thực CT, giá trị F là: A F =1 B F=13 C F=4 D Không xác định Câu 4: Cho biểu thức S:= 10 mod * + 12 div 5, kết S là: A B C D 12 Câu 5: Để đưa giá trị hai biến x,y hình ta sử dụng thủ tục sau pascal? A Read(x;y); B Readln(x,y); C Writeln(x,y); D Write(x;y); Câu 6: Cho biểu thức A: = 3*abs(x-y) + sqr(x+1)*2, x,y nhận giá trị 4; kết thu là: A 12 + B 56 C + D 58 Câu 7: Cho hai biến nguyên x,y thoả 100 x,y 150 S = x*y S khai báo tốn nhớ nhất? A Var s: integer; B Var s: byte; C Var s: longint; D Var s: real; Câu 8: Cho biểu thức toán sau: , biểu diễn biểu thức ngơn ngữ lập trình pascal A 2*sin(sqr(x) + 1) – * sqrt(x+2); B 2*sin(sqrt(x) + 1) – 4*sqr(x+2); C 2sin(x*x + 1) – 4sqrt(x+2); D 2*sin(x*x +1) – 4* sqr(x+2); Câu 9: Cú pháp sau cho câu lệnh While A While : ; B While(điều kiện) 5) K:=K-2; Write(K); Kết xuất hình là: A B C 10 D 10 Câu 12: 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: A If a>0, b>0, c>0 then B If (a>0) or (b>0) or (c>0) then C If (a>0) and (b>0) and (c>0) then D If a,b,c>0 then II PHẦN TỰ LUẬN: (4 điểm) Viết chương trình nhập từ bàn phím số nguyên dương N (N≤100) dãy số nguyên A 1, A2, AN có trị tuyệt đối nhỏ 1000 Đưa hình thơng tin sau: a Tổng số nguyên chẵn, tổng số nguyên lẻ dãy số b Tổng giá trị dãy số BÀI LÀM I PHẦN TRẮC NGHIỆM: Câu 10 11 12 Đ.án II PHẦN TỰ LUẬN: ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ………………………………………………………………………………………………………… ĐÁP ÁN ĐỀ KIỂM TRA 45 PHÚT Môn: Tin học 11 TRƯỜNG THPT ………………… TỔ KHOA HỌC TỰ NHIÊN I PHẦN TRẮC NGHIỆM: (6 điểm) Mỗi phương án 0,5 điểm Câu 10 11 12 Đ.án C B B C C B A A C C A C II PHẦN TỰ LUẬN: (4 điểm) {Phần khai báo} Program phan_tu_luan; Uses crt; Const Nmax=100; Var A:array[1 nmax] of integer; I,n:byte; tc,tl,tongd:integer; Begin Clrscr; Write(‘Nhap N=’); Readln(N); {Tạo dãy số} For i:=1 to n Begin Write(‘A[‘,I,’]=’); Readln(a[i]); End; {Đếm đưa hình giá trị} tc:=0; tl:=0; For i:=1 to n If a[i] mod = then tc:=tc + a[i] else tl:=tl + a[i]; Tongd:=tc+tl; Writeln(‘Tong so chan cua day la: ’,tc); Writeln(‘Tong so le cua day la: ’,tl); Write(‘Tong gia tri cua day la: ’,tongd); Readln; End Thực đầy đủ phần khai báo điểm Nhập số nguyên N tạo dãy số điểm Đếm đưa hình giá trị điểm ... ………………………………………………………………………………………………………… ĐÁP ÁN ĐỀ KIỂM TRA 45 PHÚT Môn: Tin học 11 TRƯỜNG THPT ………………… TỔ KHOA HỌC TỰ NHIÊN I PHẦN TRẮC NGHIỆM: (6 điểm) Mỗi phương án 0 ,5 điểm Câu 10 11 12 Đ.án C B B C C B A A C C A C...BÀI LÀM I PHẦN TRẮC NGHIỆM: Câu 10 11 12 Đ.án II PHẦN TỰ LUẬN: ………………………………………………………………………………………………………… …………………………………………………………………………………………………………