TRẮC NGHIỆM: 3Đ Thí sinh chọn và ghi câu trả lời đúng nhất vào ô: Câu hỏi Đáp án.. Câu 1: Câu lệnh Pascal nào sau đây là hợp lệ?[r]
TRƯỜNG THCS ………………… Tên HS: ………………………………… Lớp: 8… ĐỀ KIỂM TRA HỌC KỲ II – NĂM HỌC 20… – 20… Môn: Tin Học – Thời gian: 45 phút – Ngày thi: ./ ./ 20… ĐIỂM Điểm ghi chữ Tên, chữ kí giám thị GT1: Giám khảo ký, ghi rõ họ tên GT2: ĐỀ 1: I TRẮC NGHIỆM: (3Đ) Thí sinh chọn ghi câu trả lời vào ô: Câu hỏi Đáp án Câu 1: Câu lệnh Pascal sau hợp lệ? a For i:=100 to write(‘Tin hoc’); b For i:=1.5 to 10.5 s:=s+1; c For i:1 to 10 writeln(‘HKII’); d For i:=1 to 15 writeln(‘Lop 8’); Câu 2: Sau thực đoạn chương trình sau, giá trị biến X bao nhiêu? X:=0; For i:=1 to 10 If ( i mod = 0) then X:=X + I; a X=18 b X = 20 c X = 24 d X = 30 Câu 3: Câu lệnh pascal sau không hợp lệ? a While x>5 x = x + 1; b While x0 x:= x – 2; d While x=10 x:=x+3; Câu 4: Các khai báo biến mảng Pascal, khai báo sau hợp lệ? a Var X: array[1,50] of integer; b Var A: array[1…50] of real; c Var A: array[1.5 50] of integer; d Var X: array[1 50] of real; Câu 5: Câu lệnh Pascal sau không hợp lệ? a For i:=1 to 15 x: = x+2; b While ( n mod I 0 ) i:=i+1; c A: array[1 10] of real; d For i:=1 to 10 begin tong:= tong+i; Câu 6: Vòng lặp While vòng lặp: a Biết trước số lần lặp b Chưa biết số lần lặp c Biết trước số lần lặp nhỏ 50 lần d.Có số lần lặp khơng 1000 lần II THỰC HÀNH: (7Đ) Câu 1: ( 3đ) Viết chương trình nhập vào số ngun n Tính in hình N! Câu 2: (4 đ) Viết chương trình nhập mảng n số nguyên In hình phần tử lớn nhỏ mảng TRƯỜNG THCS …………………… Tên HS: Lớp: ĐỀ KIỂM TRA HỌC KỲ II – NĂM HỌC 20… – 20… Môn: Tin Học – Thời gian: 45 phút – Ngày thi: ./ ./ 2017 ĐIỂM Điểm ghi chữ Tên, chữ kí giám thị GT1: Giám khảo ký, ghi rõ họ tên GT2: ĐỀ 2: I TRẮC NGHIỆM: (3Đ) Thí sinh chọn ghi câu trả lời vào ô: Câu hỏi Đáp án Câu 3: Câu lệnh pascal sau không hợp lệ? a While x>5 x = x + 1; b While x0 x:= x – 2; d While x=10 x:=x+3; Câu 1: Câu lệnh Pascal sau hợp lệ? a For i:=100 to write(‘Tin hoc’); b For i:=1.5 to 10.5 s:=s+1; c For i:1 to 10 writeln(‘HKII’); d For i:=1 to 15 writeln(‘Lop 8’); Câu 2: Sau thực đoạn chương trình sau, giá trị biến X bao nhiêu? X:=0; For i:=1 to 10 If ( i mod = 0) then X:=X + I; a X=18 b X = 20 c X = 24 d X = 30 Câu 6: Vòng lặp While vòng lặp: a Biết trước số lần lặp b Chưa biết số lần lặp c Biết trước số lần lặp nhỏ 50 lần d.Có số lần lặp khơng q 1000 lần Câu 4: Các khai báo biến mảng Pascal, khai báo sau hợp lệ? a Var X: array[1,50] of integer; b Var A: array[1…50] of real; c Var A: array[1.5 50] of integer; d Var X: array[1 50] of real; Câu 5: Câu lệnh Pascal sau không hợp lệ? a For i:=1 to 15 x: = x+2; b While ( n mod I 0 ) i:=i+1; c A: array[1 10] of real; d For i:=1 to 10 begin tong:= tong+i; II THỰC HÀNH: (7Đ) Câu 1: ( 3đ) Viết chương trình nhập vào số ngun n Tính in hình N! Câu 2: (4 đ) Viết chương trình nhập mảng n số nguyên In hình phần tử lớn nhỏ mảng ĐÁP ÁN, BIỂU ĐIỂM ĐỀ KIỂM TRA HKII NĂM HỌC 20… – 20… MÔN: TIN HỌC I TRẮC NGHIỆM: (3Đ) Thí sinh chọn ghi câu trả lời vào ô: câu 0.5đ Câu hỏi Đáp án đề d Đáp án đề a II THỰC HÀNH: (7Đ) d d a d Câu 1: Program cau1; Var i,n, p:integer; Begin Writeln(‘Nhap n:’); Readln(n); p:=1; For i:=1 to n P:=p*i; Writeln(n, ‘! = ’, p); Readln; End Câu 2: Program Cau2; Var a:array[1 100] of integer; I,n,max,min: integer; Begin Writeln(‘Nhap n:’); Readln(n); For i:=1 to n Begin Writeln(‘Nhap a[‘,I,’]:’); Readln(a[i]); End; d b d d b d Max:=a[1]; Min:= a[1]; For i:=2 to n If a[i] > max then max:=a[i]; If a[i] < then min:=a[i]; Writeln(‘So lon nhat day la:’, max); Writeln(‘So be nhat day la:’, min); Readln; End ... Lớp: ĐỀ KIỂM TRA HỌC KỲ II – NĂM HỌC 20… – 20… Môn: Tin Học – Thời gian: 45 phút – Ngày thi: ./ ./ 2017 ĐIỂM Điểm ghi chữ Tên, chữ kí giám thị GT1: Giám khảo ký, ghi rõ họ... x>0 x:= x – 2; d While x=10 x:=x+3; Câu 1: Câu lệnh Pascal sau hợp lệ? a For i:=100 to write(‘Tin hoc? ??); b For i:=1.5 to 10.5 s:=s+1; c For i:1 to 10 writeln(‘HKII’); d For i:=1 to 15 writeln(‘Lop