MA TRẬN ĐỀ KIỂM TRA
Mức độ
Bài
Biết Hiểu Vận dụng Cộng
6
1
0,5
2
0,5
7
1
0,5
2
1
3
2,5
8
1
0,5
1
3
9
1
0,5
PM HT
1 (II)
1
Cộng
4
2
2

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?
A. Giá trị biến đếm.
B. Viết số 1 rồi viết số 3.5
C. Chỉ viết số 3.5 mà thôi
D. 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/Các nút lệnh dưới đây là của phần mềm nào? (1 điểm)
:
:
III/ 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: (2 điểm)
Program Tinh tong;
………………………………………………………………………………
…………
Uses crt;
………………………………………………………………………………
…………
Var N; i: Integer;
………………………………………………………………………………
…………

Viết chương trình tính tổng:
1 1 1 1
1
2 3 4
S
n
= + + + + +

Trong đó n là số nguyên nhập từ bàn phím.

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 10 do s := s+i;
A.15 B. 55 C. 45 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. string B. real; C. Interger; 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 do writeln(i); sẽ viết ra màn hình?
A.Viết số 1 rồi viết số 3.
B.Giá trị biến đếm.
C.Chỉ viết số 3 mà thôi.
D.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 100] of real; C. Var a,b: array[1 : n] of Integer;
B. Var a,b: array[1 n] 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/Các nút lệnh dưới đây là của phần mềm nào? (1 điểm)
:
:
III/ 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:
(2 điểm)
Program Tinh tong;
………………………………………………………………………………
…………
Uses crt;
………………………………………………………………………………
…………
Var N; i: Integer;


IV/ Viết chương trình giải quyết bài toán: (2 điểm)
Viết chương trình tính tổng:
S= 1+2+3+ + n
Trong đó n là số nguyên nhập từ bàn phím.


A. string B. real; C. Interger; 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 do writeln(i); sẽ viết ra màn hình?
A.Giá trị biến đếm.
B.Viết số 1 rồi viết số 3
C.Chỉ viết số 3 mà thôi
D.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 100] of real; C. Var a,b: array[1 : n] of Integer;
B. Var a,b: array[1 n] 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/Các nút lệnh dưới đây là của phần mềm nào? (1 điểm)
:
:
III/ 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:
(2 điểm)
Program Tinh tong;
………………………………………………………………………………
…………
Uses crt;
………………………………………………………………………………
…………
Var N; i: Integer;
………………………………………………………………………………
…………
S:real ;
BEGIN
Clrscr;
………………………………………………………………………………

S
n
= + + + + +

Trong đó n là số nguyên nhập từ bàn phím.


Câu 6: 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. string B. real; C. Interger; D. Tất cả các kiểu trên đều được
Câu 7: Chọn khai báo hợp lệ:
A. Var a,b: array[1 100] of real; C. Var a,b: array[1 : n] of Integer;
B. Var a,b: array[1 n] of real; D. Var a,b: array[1 … 100] of real;
Câu 8 : Sau khi thực hiện đoạn chương trình sau kết quả của S là bao nhiêu ?
S := 1;
For i := 1 to 5 do S := S*i ;
A. 0 B. 15 C. 120 D. Số khác.
II/Các nút lệnh dưới đây là của phần mềm nào? (1 điểm)
:
:
III/ 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:
(2 điểm)
Program Tinh tong;

………………………………………………………………………………
…………
Uses crt;
………………………………………………………………………………
…………
Var N; i: Integer;
………………………………………………………………………………
…………
S:real ;
BEGIN
Clrscr;
………………………………………………………………………………
…………

n
= + + + + +

Trong đó n là số nguyên nhập từ bàn phím.
……………………………………………
END.
Program Tinh_tong; 0,5

Var N, i: Integer; 0,5

S:=0; 0,5
For i: =1 to N do S:=S+i ; 0,5
………………………………………………
……………………………………………
IV/ Viết chương trình giải quyết bài toán: (2 điểm)
Program Tong_Nghich_Dao; 0,25
Var S: real; 0,25
n, i: integer; 0,25
Begin
Write(‘Nhap so n = ‘); Readln(n); 0,25
S:= 0; 0,25
For i:= 1 to n do S: = S + 1/i; 0,25
Writeln(‘Tong can tim la: ‘, S:6:2); 0,25
Readln
End. 0,25
