Đề kiểm tra 45 phút học kì II môn Tin học Lớp 8 (Có đáp án)

 A. PHẦN TRẮC NGHIỆM: (3 điểm) Khoanh tròn vào đáp án đúng:
Câu 1: C¸c c©u lÖnh Pascal nµo sau ®©y hîp lÖ :
 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’); D. for i:=1 to 10 do writeln(‘A’);
Câu 2: Câu lệnh Pascal : While (4*5>=20) do Writeln (4*5); sẽ :
 A. In số 20 ra màn hình 4 lần.
 B. In số 20 ra màn hình 5 lần.
 C. Không thực hiện lệnh Writeln (4*5);
 D. Lặp vô hạn lần lệnh Writeln (4*5);
Câu 3: While S<=20 do Writeln(S); Điều kiện để dừng chương trình là
 A. S>20 B. S=20 C.S20 D. S<20
Câu 4: Đoạn lệnh sau đây sẽ cho kết quả gì?
 so:=1;
 While so < 10 do writeln(so); so:=so + 1;
 A. In ra vô hạn các số 1, mỗi số trên một dòng; B. Không phương án nào đúng
 C. In ra các số từ 1 đến 9; D. In ra các số từ 1 đến 10;
Câu 5: Câu lệnh nào sau đây lặp vô hạn lần
 A. s:=5; i:=0; C. s:=5; i:=1;
 While i<=s do While i<=s do s:=s i:=i ++ 1;1;
 B. s:=5; i:=1; D. s:=0; i:=0; n:=5;
 While i> s do While i<=n do 
 i:=i + 1; Begin
 If (i mod 2)=1 Then S:=S + i;
 Else i:=i+1;
 End;
Câu 6: Để tính tổng S=1/2+1/4 + 1/6 +  +1/ n; em chọn đoạn lệnh:
 A. for i:=1 to n do C. for i:=1 to n do
 if ( i mod 2)=0 then S:=S + 1/i; if ( i mod 2) 0 then S:=S + i;
 B. for i:=1 to n do D. for i:=1 to n do
 if ( i mod 2)=0 then S:=S – 1/i if ( i mod 2)=0 then S:=S +1/ i
 Else S:= S + 1/i; Else S:=S-1/i; Câu 2: Đoạn chương trình (3đ)
 STT Số câu hỏi Tổng số bút cần mua
 1 n= 8 S= 72
 2 n=15 S= 240 (1đ)
 3 n=32 S= 1056 (1đ)