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