Đề khảo sát chất lượng học kì II Tin học 8 (Có đáp án) - Năm học 2015-2016 - Trường THCS Nhuế Dương

PHÒNG GD&ĐT KHOÁI CHÂU
TRƯỜNG THCS NHUẾ DƯƠNG
ĐỀ THI KHẢO SÁT CHẤT LƯỢNG HKII
Năm học: 2015 – 2016.
Môn:Tin 8
Thời gian làm bài:45 phút (Không kể thời gian giao đề)
I. Trắc nghiệm
Khoanh tròn chữ cái đứng trước phương án trả lời đúng các câu sau:
Câu 1: 0Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x?
A. Write(‘Nhập x = ’);	B. Read(x);	 C. Writeln(x);	D. Readln(x);
Câu 2: Cho S và i là biến nguyên. Khi chạy đoạn chương trình : 
s:=1;for i:=1 to 4 do s := s+i writeln(s); Kết quả in lên màn hình là của s là: 
	A 55 	B 10 	C 15	D 11 
Câu 3: 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. 
	A Integer;	B Tất cả các kiểu trên đều được. C String	D Real;	
Câu 4: Trong câu lệnh lặp for i:=1 to 15 do Write(‘A’); thì lệnh Write(‘A’) được thực hiện bao nhiêu lần? 
	A Không lần nào	B 1 lần	C 2 lần. 	D 15 lần
Câu 5: Để tính tổng của n số tự nhiên đầu tiên em chọn đoạn lệnh nào sau đây: 
	A for i:=1 to n do if ( i mod 2)0 then S:=S + i; 
 	B for i:=1 to n do if ( i mod 2)=0 then S:=S + i;
	C for i:=1 to n do S:= S + i ;
	D for i:=1 to n do if ( i mod 2)=1 then S:=S + i;
Câu 6: Điền Đ (đúng) hoặc S (sai) vào đầu các câu lệnh sau:
1.for i:=10 to 1 do writeln('b');
2. var x: integer; begin for x := 1 to 10 do writeln('b'); end.
3. for i:=1 to 100 do ;
4. for i:=1 to 100 do writeln('b');
5.for i:=0.5 to 5.5 do writeln('b');
6.for i=1 to 100 do writeln('b');
7. whiledo là câu lệnh lặp với số lần lặp biết trước trong pascal 
8. S:=0; n:=0;
while S <= 100 do
 begin n:=n+1; S:=S+n end;
II /Tự luận
Câu 1: Em hãy lợi ích của việc sử dụng mảng.
Câu 2: Hãy viết chương trình tính biểu thức sau:
S=1+1/2+1/3+1/4+...1/n. Trong đó n nhập từ phím.
Câu 3 : Viết chương trình tính diện tích hình tròn, bán kính nhập từ phím.
Câu 4: Viết cú pháp khai báo biến mảng.
ĐÁP ÁN VÀ THANG ĐIỂM
I. Trắc nghiệm
Từ câu 1 đến câu 4 mỗi câu đúng được 0,5 điểm
	1. D	2. A	3. D	4. C	
Câu 5: mỗi ý đúng được 0,5 điểm
Điền Đ (đúng) hoặc S (sai) với các câu sau: 
S - 1.for i:=10 to 1 do writeln('b');
Đ- 2. var x: integer; begin for x := 1 to 10 do writeln('b'); end.
Đ- 3. for i:=1 to 100 do ;
Đ- 4. for i:=1 to 100 do writeln('b');
S- 5.for i:=0.5 to 5.5 do writeln('b');
S- 6.for i=1 to 100 do writeln('b');
S- 7. whiledo là câu lệnh lặp với số lần lặp biết trước trong pascal 
S- 8. S:=0; n:=0;
while S <= 100 do
 begin n:=n+1; S:=S+n end;
II /Tự luận:
Câu 6: (2 đ)
Lợi ích chính của việc sử dụng biến mảng là rút gọn việc viết chương trình, có thể sử dụng câu lệnh lặp để thay nhiều câu lệnh. Ngoài ra chúng ta còn có thể lưu trữ và xử lí nhiều dữ liệu có nội dung liên quan đến nhau một cách hiệu quả.
Câu 7 (2 đ)
var	0,25 đ
 i,n:byte; 	0,25đ
 A: array[1..50] of real;	
Begin	
 Write(‘Hãy nhập vào số phần tử của mảng’); readln(n);	0,5 đ
 For i:=1 to n do 
 Begin
 Write(‘A[‘,i, ‘]=’);
 readln(A[i]);	0,5 đ
 End.
 Write(‘Dãy số vừa nhập là:’);	
 For i:=1 to n do Write(A[i], ‘;’);	0.5 đ	
Readln;
14.End.