Đề thi học kì 2 tin học 8

Trường THCS Giục Tượng Họ tên: ……………… Lớp: Điểm Kiểm tra học kì II Môn: Tin học Thời gian: 45 phút Lời phê giáo viên Đề bài: ĐỀ 1: Câu (2điểm) Khai báo biến mảng sau cho đúng: a) a: array [ 9, 15] of integer; b) a : array [ 10 1] of integer; Câu 2(1,5đ) Viết đoạn lệnh cần thiết muốn nhập liệu cho mảng X gồm 20 phần tử từ bàn phím Câu 3(1,5đ) Cho s; I biến nguyên, chạy chương trình s : = 1; for i : = to s : = s*i ; Writeln (s); Kết in hình bao nhiêu? Câu 4(5đ) Viết chương trình nhập n số tự nhiên xuất hình số chẵn Bài làm: Trường THCS Giục Tượng Họ tên: ……………… Lớp: Điểm Kiểm tra học kì II Môn: Tin học Thời gian: 45 phút Lời phê giáo viên Đề bài: ĐỀ 2: Câu 1(2điểm) Khai báo biến mảng sau cho đúng: a) a: array [ 1: 99] of integer; b) a : array [ 1…100] of real; Câu 2(1,5đ) Viết đoạn lệnh cần thiết muốn nhập liệu cho mảng X gồm 30 phần tử từ bàn phím Câu 3(1,5đ) Cho s; i biến nguyên, chạy chương trình s : = 0; for i : = to s : = s + i ; Writeln (s); Kết in hình bao nhiêu? Câu 4(5đ) Viết chương trình nhập n số tự nhiên xuất hình số lẻ Bài làm: ĐÁP ÁN VÀ THANG ĐIỂM Câ Đề u a) a: array [ 15] of integer; b) a : array [ 10] of integer; For i : = to 20 Writeln (A[ i]); Kết in hình là: 120 Program so_so_chan; Var A: array [ 100] of integer; Dem, i : integer; Begin Write (‘do dai cua day so n =’); Readln (n); Writeln (‘ cac phan tu cua day so:’); For i: =1 to n Begin Writeln(‘a[‘,i,’] = ‘);Readln (a[i]); End; Dem: = 0; For i: =1 to n If a[i] mod = then dem: = dem + 1; Writeln(‘co’,dem,’so chan’); Readln; End Đề a) a: array [ 99] of integer b) a : array [ 100] of real; For i : = to 30 Writeln (a[ i]); Kết in hình : 15 Program so_so_le; Var A: array [ 100] of integer; Dem, i : integer; Begin Write (‘do dai cua day so n =’); Readln (n); Writeln (‘ cac phan tu cua day so:’); For i: =1 to n Begin Writeln(‘a[‘,i,’] = ‘);Readln (a[i]); End; Dem: = 0; For i: =1 to n If a[i] mod < >0 then dem: = dem + 1; Writeln(‘co’,dem,’so le’); Readln; End Điểm 1đ 1đ 0,75đ 0,75đ 1,5đ 0,5đ 0,5đ 0,5đ 0,5đ 0,5đ 0,5đ 0,5đ 0,5đ 0,5đ 0,5đ  ... tra học kì II Môn: Tin học Thời gian: 45 phút Lời phê giáo viên Đề bài: ĐỀ 2: Câu 1 (2 iểm) Khai báo biến mảng sau cho đúng: a) a: array [ 1: 99] of integer; b) a : array [ 1…100] of real; Câu 2( 1,5đ)... ĐÁP ÁN VÀ THANG ĐIỂM Câ Đề u a) a: array [ 15] of integer; b) a : array [ 10] of integer; For i : = to 20 Writeln (A[ i]); Kết in hình là: 120 Program so_so_chan; Var A: array [... a) a: array [ 1: 99] of integer; b) a : array [ 1…100] of real; Câu 2( 1,5đ) Viết đoạn lệnh cần thi t muốn nhập liệu cho mảng X gồm 30 phần tử từ bàn phím Câu 3(1,5đ) Cho s; i biến nguyên, chạy