TRƯỜNG THPT HÀM THUẬN BẮC (Đề Chính Thức) Điểm: KIỂM TRA 15 PHÚT LẦN KHỐI 11 Năm học: 2016-2017 Môn: Tin Học Thời gian: 15 phút Lời phê Thầy( Cơ) giáo: Chữ kí giám thị: Họ tên: ………………………………………………….Lớp : ……… ĐỀ 2: Câu 1: (2đ) Hãy viết cú pháp khai báo trực tiếp biến mảng chiều? Lớp 11A có 28 học sinh, khai báo biến mảng lưu trữ điểm trung bình mơn Tin học sinh lớp Câu 2: (1,5đ) Cho đoạn chương trình sau: S:= 2; For i:= to if A[i] mod =0 then S:= S+2*A[i]; Cho mảng A gồm phần tử sau: 12 17 21 Cho biết kết sau thực đoạn chương trình trên? Câu 3: (1,5đ) Cho đoạn chương trình sau: For i:= to If …………………………….then write(A[i], ‘ ’); Cho mảng A gồm giá trị sau: -2 14 15 10 -24 44 Hãy điền vào dấu chấm để kết xuất hình là: 14 10 44 Câu 4: (5đ) Đoạn chương trình sau dùng để đếm số lượng các số nguyên lẻ mảng bị lỗi Program BT; Var A: array[1 N] of integer; N, i, Dem: byte; Begin For i := to 10 readln(A(i)); Dem := 1; For i:=1 to 10 if A[i] mod = then Dem := Dem +1; Write(‘gia tri cua Dem=’,Dem); a)Hãy tìm sữa lỗi cho Readln End b)Giả sử mảng A gồm giá trị sau: 10 11 121 20 Cho biết kết xuất hình? HẾT ... Readln End b)Giả sử mảng A gồm giá trị sau: 10 11 121 20 Cho biết kết xuất hình? HẾT