TRƯỜNG THCS
KIỂM TRA GIỮA KỲ II (2021-2022)


MÔN: TIN HỌC 8 (45 PHÚT)

 Thời gian: 45 phút (không kể thời gian phát đề)
A. TRẮC NGHIỆM KHÁCH QUAN: (4 điểm, mỗi câu được 0,5 điểm)
* Khoanh tròn vào chữ cái đứng trước kết quả em cho là đúng trong mỗi câu sau:
Câu 1: Kiểu dữ liệu của biến đếm trong lệnh lặp For – do:
   A. Cùng kiểu với giá trị đầu và giá trị cuối B. Chỉ cần khác kiểu với giá trị đầu
   C. Cùng kiểu với các biến trong câu lệnh D. Không cần phải xác định kiểu dữ liệu
Câu 2: Hoạt động nào sau đây lặp với số lần lặp biết trước?
   A. Giặt tới khi sạch    B. Học bài cho tới khi thuộc bài
   C. Gọi điện tới khi có người nghe máy    D. Ngày đánh răng 2 lần
Câu 3: Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng :
   A. for i:=1 to 10; do x:=x+1;    B. for i:=1 to 10 do x:=x+1;
   C. for i:=10 to 1 do x:=x+1;    D. for i =10 to 1 do x:=x+1;
Câu 4: Với ngôn ngữ lập trình Passcal câu lệnh lặp for i:=1 to 10 do x:=x+1; thì biến đếm i phải được khai báo là kiểu dữ liệu nào?
   A. Integer   B. Real    C. String    D. Tất cả các kiểu trên đều được
Câu 5: Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 100
   A. 1    B. 100    C. 99    D. Tất cả đều sai
Câu 6: Vòng lặp While – do kết thúc khi nào
   A. Khi một điều kiện cho trước được thỏa mãn    B. Khi đủ số vòng lặp
   C. Khi tìm được Output    D. Tất cả các phương án
Câu 7: Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:
   i := 5; While i>=1 do i := i – 1;
   A. 1 lần    B. 2 lần    C. 5 lần    D. 6 lần
Câu 8: Cú pháp lệnh lặp với số lần chưa biết trước:
   A. While < điều kiện > to < câu lệnh >;   B. While < điều kiện > to < câu lệnh 1 > do < câu lệnh 2 >;
   C. While < điều kiện > do ;< câu lệnh >; D. While < điều kiện > do < câu lệnh >;
B. Tự luận (6 điểm)
Câu 1: (2đ)Hãy phát biểu sự khác biệt giữa câu lệnh lặp với số lần lặp cho trước và câu lệnh lặp với số lần lặp chưa biết trước?
Câu 2: (1,5đ) Em hãy sắp xếp chương trình tính tổng N số tự nhiên sau cho phù hợp?
Var N, i: integer;
Write(‘Nhap so N=’); s:=0;
S: Longint; readln(n);
For i:=1 to n do
Begin Program tinh_tong;
S:=s+i;
Writeln(‘Tong cua ‘, N, ‘ So tu nhien dau tien s=’, s);
End.
Readln;
Câu 3: (2,5đ) Em hãy viết chương trình tính tổng N số tự nhiên sao cho tổng nhỏ nhất lớn hơn 150. Dùng câu lệnh While ... Do.

----------------------------o0o----------------------------