Đề kiểm tra học kỳ II môn Tin học Lớp 8 - Năm học 2021-2022 - Đề 2 (Có đáp án)
A. Phần Trắc Nghiệm (3đ)
Câu 1: Các câu lệnh Pascal nào sau đây được viết đúng?
A. Chieu_cao : Array [1 . 10] of real; B. Chieu_cao : Array [1 .. 10] of real;
C. Chieu_cao : Array [1 … 10] of real; D. Chieu_cao : Array [1 .... 10] of real;
Câu 2: Các câu lệnh WHILE .. DO nào sau đây được viết đúng?
A. While < câu lệnh > to < điều kiện >; B. While < câu lệnh > do < điều kiện >;
C. While < điều kiện > to < câu lệnh >; D. While < điều kiện > do < câu lệnh >;
Câu 3: Các câu lệnh FOR .. TO .. DO nào sau đây được viết đúng?
A. For
B. For
C. For
D. For
Câu 4: Cho S và i là biến nguyên. Khi chạy đoạn chương trình:
s:=5;
for i:=1 to 5 do s := s+i; writeln(s);
Kết quả in lên màn hình là:
A. S = 10 B. S = 15 C. S = 20 D. S = 25
Câu 5: Vòng lặp While <điều kiện=""> do
A. Vòng lặp chưa biết trước số lần lặp B. Biết trước số lần lặp nhưng giới hạn là >=100
C. Vòng lặp biết trước số lần lặp D. Biết trước số lần lặp nhưng giới hạn là <=100
Câu 6: Để gán giá trị 20 cho biến X ta dùng lệnh nào sau đây?
A. X =: 20 B. X = 20 C. X : 20 D. X: = 20
File đính kèm:
- de_kiem_tra_hoc_ky_ii_mon_tin_hoc_lop_8_nam_hoc_2021_2022_de.doc
Nội dung text: Đề kiểm tra học kỳ II môn Tin học Lớp 8 - Năm học 2021-2022 - Đề 2 (Có đáp án)
- PHÒNG GD&ĐT ĐỀ KIỂM TRA HỌC KỲ II TRƯỜNG THCS Môn: Tin học 8 Năm học: 2021 - 2022 Thời gian: 45 phút A. Phần Trắc Nghiệm (3đ) Câu 1: Các câu lệnh Pascal nào sau đây được viết đúng? A. Chieu_cao : Array [1 . 10] of real; B. Chieu_cao : Array [1 10] of real; C. Chieu_cao : Array [1 10] of real; D. Chieu_cao : Array [1 10] of real; Câu 2: Các câu lệnh WHILE DO nào sau đây được viết đúng? A. While to ; B. While do ; C. While to ; D. While do ; Câu 3: Các câu lệnh FOR TO DO nào sau đây được viết đúng? A. For := to do ; B. For := to do ; C. For = to do ; D. For = to do ; Câu 4: Cho S và i là biến nguyên. Khi chạy đoạn chương trình: s:=5; for i:=1 to 5 do s := s+i; writeln(s); Kết quả in lên màn hình là: A. S = 10 B. S = 15 C. S = 20 D. S = 25 Câu 5: Vòng lặp While do ; là: A. Vòng lặp chưa biết trước số lần lặp B. Biết trước số lần lặp nhưng giới hạn là >=100 C. Vòng lặp biết trước số lần lặp D. Biết trước số lần lặp nhưng giới hạn là <=100 Câu 6: Để gán giá trị 20 cho biến X ta dùng lệnh nào sau đây? A. X =: 20 B. X = 20 C. X : 20 D. X: = 20 Phần trả lời lý thuyết: Hãy ghi câu trả lời đúng vào bảng sau Câu hỏi 1 2 3 4 5 6 Đáp án
- B. Phần Tự Luận (7đ) Câu 7: Hãy chỉ ra lỗi của các câu lệnh sau đây, và sữa lại cho đúng: (3đ) a) For i:= 100 to 1 do writeln (‘A’); b) For i:= 1.5 to 10.5 do writeln (‘A’); c) For i:= 1 to 10 do; writeln (‘A’); Câu 8:Viết chương trình tìm Max – Min của dãy số với N là số nguyên được nhập từ bàn phím. (4đ)
- Ma trận Đề Mức độ Nhận biết Thông hiểu Vận dụng Nội dung Câu lệnh điều kiện Câu 6 Câu 8 Câu lệnh For do Câu 3 Câu 4 Câu lệnh While do Câu 5 Câu 2 Biến mảng Câu 1 Câu 7 Tổng cộng 1.0 1.5 7.5 Đáp án Đề A. Phần trắc nghiệm: Mỗi câu đúng được 0.5 điểm Câu hỏi 1 2 3 4 5 6 Đáp án B D A C A D B. Phần Tự Luận (7đ) Câu 7: Hãy chỉ ra lỗi của các câu lệnh sau đây, và sữa lại cho đúng: (3đ) a) For i:= 100 to 1 do writeln (‘A’); Sai vì: có giá trị đầu lớn hơn giá trị cuối, không đúng với cú pháp Sữa lại: For i:= 1 to 100 do writeln (‘A’); b) For i:= 1.5 to 10.5 do writeln (‘A’); Sai vì: có giá trị đầu và giá trị cuối là kiểu số thực, không đúng với cú pháp Sữa lại: For i:= 1 to 10 do writeln (‘A’); c) For i:= 1 to 10 do; writeln (‘A’); Sai vì: sau từ do có dấu ; như vậy không đúng với cú pháp Sữa lại: For i:= 1 to 10 do writeln (‘A’);
- Câu 8:Viết chương trình tìm Max – Min của dãy số với N là số nguyên được nhập từ bàn phím. (4đ) program Max_Min; uses crt; Var i, n, Max, Min: integer; 1.0 đ A: array[1 100] of integer; Begin clrscr; 0.5 đ write('Hay nhap do dai cua day so, N = '); readln(n); writeln('Nhap cac phan tu cua day so:'); For i:=1 to n do Begin 0.5 đ write('a[',i,']='); readln(a[i]); End; Max:=a[1]; Min:=a[1]; 0.5 đ For i:=2 to n do Begin if Max a[i] then Min:=a[i]; End; writeln('So lon nhat la Max = ',Max); writeln('So nho nhat la Min = ',Min); 0.5 đ readln End.