De Thi HK2 n- Tin 8 (4 de trac Nghiem+Tu luan)

Trường Trịnh Hoài Đức
---------****--------
KIỂM TRA HỌC KÌ II – NĂM HỌC 2010 - 2011
Môn : TIN HỌC 8
Thời gian: 45 phút (ĐỀ 1)

Họ và tên:........................................
Lớp: 8A
Điểm:


I/ Khoanh tròn chữ cái đứng trước phương án em cho là đúng: (4 điểm)
Câu 1: Lệnh lặp nào sau đây là đúng?
For = to do ;
For := to do ;
For := to do ;
For : to do ;
Câu 2: Vòng lặp While <Điều kiện> do ; là vòng lặp:
A. Chưa biết trước số lần lặp
B. Biết trước số lần lặp
C. Biết trước số lần lặp nhưng giới hạn là <=100
D. Biết trước số lần lặp nhưng giới hạn là >=100
Câu 3: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:
A. If a=5 then a:=a+1; else a:=a+2; B. If a=5 then a:=a+1else a:=a+2
C. If a=5 then a=a+1; else a=a+2; D. If a=5 then a:=a+1else a:=a+2;
Câu 4: Sau khi thực hiện đoạn chương trình sau, giá trị của biến S bằng bao nhiêu:
s:=0;
for i:=1 to 5 do s := s+i;
A.45 B. 55 C. 15 D. 51
Câu 5: 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 gì?
A. Interger; B. real; C. string D. Tất cả các kiểu trên đều được
Câu 6: Khi thực hiện câu lệnh for i:= 1 to 3.5 do writeln(i); sẽ viết ra màn hình?
Giá trị biến đếm.
Viết số 1 rồi viết số 3.5
Chỉ viết số 3.5 mà thôi
Không thực hiện được vì giá trị cuối không phải là số nguyên.
Câu 7: Chọn khai báo hợp lệ:
A. Var a,b: array[1 .. n] of real; C. Var a,b: array[1 : n] of Integer;
B. Var a,b: array[1 .. 100] of real; D. Var a,b: array[1 … 100] of real;
Câu 8: Trong câu lệnh lặp for i:=1 to 12 do Write(‘A’); thì lệnh Write(‘A’) được thực hiện bao nhiêu lần (nói cách khác, bao nhiêu vòng lặp được thực hiện?)
A. Không lần nào B. 1 lần C. 12 lần D. 2 lần
II/ Gạch chân dưới những câu lệnh em cho là sai rồi viết lại câu lệnh đó cho đúng: (3 điểm)

Program Tinh tong; …………………………………………………………………………………………..
Uses crt; …………………………………………………………………………………………...
Var N; i: Integer; …………………………………………………………………………………………..
S: Longint;
BEGIN
Clrscr; …………………………………………………………………………………………...
Write(‘Nhap vao so N =’ ); Readln(N);
S:=0
For i =1 to N do S:=S+i ; ……………………………………………………………………………………………
Writeln(‘Tong cua’,N, ‘so dau tien s =’, s);
Readln ……………………………………………………………………………………………
END.












IV/ Viết chương trình giải quyết bài toán: (3 điểm)
Viết chương trình tính tổng:
S = 1 + 2 + 3 + 4 + …..+ 100































--------------- ((((( ---------------

Trường Trịnh Hoài Đức
---------****--------
KIỂM TRA HỌC KÌ II – NĂM HỌC 2010 - 2011
Môn : TIN HỌC 8
Thời gian: 45 phút (ĐỀ 2)

Họ và tên:........................................
Lớp: 8A
Điểm:


I/