Đề kiểm tra học kỳ II môn Tin học Lớp 8 - Năm học 2015-2016 - Trường THCS Trần Công Ái

PHÒNG GD & ĐT VĨNH LINH
TRƯỜNG THCS TRẦN CÔNG ÁI
Đề chính thức
ĐỀ THI CHẤT LƯỢNG HỌC KÌ II
NĂM HỌC 2015 - 2016
MÔN: TIN HỌC – LỚP 8
Thời gian: 45 phút (không kể thời gian giao đề)
Câu 1: ( 2 điểm) 
Nêu câu lệnh lặp trong pascal? Cho ví dụ về câu lệnh lặp?
Câu 2: ( 2 điểm) Hãy tìm hiểu mỗi đoạn lệnh sau đây và cho biết đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
a) S:=0; n:=0;
 While s<=10 do
	begin n:=n+1; S:=S+n end;
b) S:=0; n:=0;
 While s<=10 do
 n:= n+1; s:=s+n;
Câu 3: ( 3 điểm) Viết chương trình nhận biết một số tự nhiên N được nhập vào từ bàn phím có phải số nguyên tố hay không?
Câu 4: ( 3 điểm) Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất?
-------------------------------------------------Hết------------------------------------------------
(Giám thị coi thi không giải thích gì thêm)
PHÒNG GD & ĐT VĨNH LINH
TRƯỜNG THCS TRẦN CÔNG ÁI
Đề chính thức
ĐỀ THI CHẤT LƯỢNG HỌC KÌ II
NĂM HỌC 2015 - 2016
MÔN: TIN HỌC – LỚP 8
Thời gian: 45 phút (không kể thời gian giao đề)
Câu 1: ( 2 điểm) 
Nêu câu lệnh lặp trong pascal? Cho ví dụ về câu lệnh lặp?
Câu 2: ( 2 điểm) Hãy tìm hiểu mỗi đoạn lệnh sau đây và cho biết đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
a) S:=0; n:=0;
 While s<=10 do
	begin n:=n+1; S:=S+n end;
b) S:=0; n:=0;
 While s<=10 do
 n:= n+1; s:=s+n;
Câu 3: ( 3 điểm) Viết chương trình nhận biết một số tự nhiên N được nhập vào từ bàn phím có phải số nguyên tố hay không?
Câu 4: ( 3 điểm) Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất?
-------------------------------------------------Hết------------------------------------------------
(Giám thị coi thi không giải thích gì thêm)
PHÒNG GD & ĐT VĨNH LINH
TRƯỜNG THCS TRẦN CÔNG ÁI
Đề chính thức
ĐỀ THI CHẤT LƯỢNG HỌC KÌ II
NĂM HỌC 2015 - 2016
MÔN: TIN HỌC – LỚP 8
Thời gian: 45 phút (không kể thời gian giao đề)
Câu 1: ( 2 điểm) Hãy tìm hiểu mỗi đoạn lệnh sau đây và cho biết đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
a) S:=0; n:=0;
 While s<=10 do
	begin n:=n+1; S:=S+n end;
b) S:=0; n:=0;
 While s<=10 do
 n:= n+1; s:=s+n;
Câu 2: ( 2 điểm) 
Nêu câu lệnh lặp trong pascal? Cho ví dụ về câu lệnh lặp?
Câu 3: ( 3 điểm) Viết chương trình nhận biết một số tự nhiên N được nhập vào từ bàn phím có phải số nguyên tố hay không?
Câu 4: ( 3 điểm) Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất?
-------------------------------------------------Hết------------------------------------------------
(Giám thị coi thi không giải thích gì thêm)
ĐÁP ÁN VÀ BIỂU ĐIỂM ĐỀ THI HỌC KỲ II LỚP 8
Câu 1: 
- Khai báo đúng cú pháp câu lệnh lặp: (1 điểm)
 For := to do ;
- Ví dụ về câu lệnh lặp : (1 điểm)
Câu 2: 
a) Chương trình thực hiện 5 vòng lặp. (0,5 điểm)
b) Vòng lặp trong chương trình được thực hiện vô tận vì sau câu lệnh n:=n+1; câu lệnh lặp kết thúc nên điều kiện S=0 luôn luôn được thỏa mãn. (0,5 điểm)
Nhận xét: Trong câu lệnh thực hiện, điều kiện cần phải được thay đổi để sớm hay muộn chuyển sang trạng thái không thỏa mãn. Khi đó vòng lặp mới được kết thúc sau hữu hạn bước. Để làm được điều này, câu lệnh trong câu lệnh lặp while..do thường là câu lệnh ghép. (1 điểm)
Câu 3: 
Viết chương trình số nguyên tố.
Uses Crt;
1 điểm
Var n, i: integer;
Begin
 Clrscr;
1 điểm
 write (‘ Nhap vao mot so nguyen:’); readln;
 if n<=1 then writeln(n, ‘khong la so nguyen to’)
 else
 begin
1 điểm
 I:=2;
 while (n mod i 0) do i:=i+1;
 if i=n then writeln (n, ‘la so nguyen to’)
 else writeln (n, ‘khong la so nguyen’)
 end;
 readln;
 End.
Câu 4: 
Viết chương trình tìm giá trị nhỏ nhất của dãy
0,5 điểm
Program Tim_min;
Var i,N, Min: integer;
A:Array[1..100] of integer;
Begin
0,5 điểm
Writeln(‘ nhap N’); Readln(N);
Writeln(‘ nhap các phan tu cua day so’);
For i:=1 to n do
Begin
Write(‘a[‘,i,’]=’); Readln(a[i]);
1 điểm
End;
Max:=a[1];
For i:=2 to n do
1 điểm
If max<a[i] then Max:=a[i];
Write(‘ so nho nhat la’,min);
Readln;
End.