TRƯỜNG THCS KIM ĐỒNG
ĐỀ CƯƠNG KIỂM TRA HKII
- MÔN TIN HỌC - TUẦN 34
I – Thực hành:
* Viết chương trình Pascal
BÀI NỘI DUNG
ĐÁP ÁN
LẦN 1 LẦN 2 LẦN 3
1. Tính
S:= 1-2+3-4+ +n
N=2, S= ? N=10, S= ? N=22, S= ?
2. Nhập số tự nhiên n, kiểm tra n có phải là số nguyên tố
không?
0 1 11
3.
Tính
)1.(

4.3
3
3.2
2
2.1
1
+
++++=
nn
n
A
N=1 N=5 N=15
4.

Trăm trâu, trăm cỏ
Trâu đứng ăn năm
Trâu nằm ăn ba
Trâu già ba con một bó
Hỏi có bao nhiêu trâu đứng, trâu nằm, trâu già?
II– Lý thuyêt:
Câu 1: Trong câu lệnh lặp FOR TO DO của Pascal, điều kiện cần phải kiểm tra là:
a) biến đếm >= giá trị cuối b) biến đếm <= giá trị cuối
c) biến đếm = giá trị cuối d) biến đếm > giá trị cuối
Câu 1: Cho câu lệnh;
for i:= 4 to 9 do s:=s+i;
kết thúc câu lệnh chương trình thực hiện bao nhiêu vòng lặp
a) 9 b) 4 c) 6 d) 13
Câu 1: Trong câu lệnh lặp FOR TO DO của Pascal, điều kiện để dừng vòng lặp là:
a) biến đếm >= giá trị cuối b) biến đếm <= giá trị cuối
c) biến đếm = giá trị cuối d) biến đếm > giá trị cuối
2
Câu 1: Cho câu lệnh;
for i:= 14 to 29 do s:=s+i;
kết thúc câu lệnh chương trình thực hiện bao nhiêu vòng lặp
a) 10 b) 14 c) 16 d) 19
Câu 2: Sửa lại câu lệnh sau cho đúng
for i:= 100 to 1 do writeln('A');
Câu 2: Sửa lại câu lệnh sau cho đúng
for i:= 10.5 to 18.5 do writeln('A');
Câu 2: Sửa lại câu lệnh sau cho đúng
for i= 10 to 100 do writeln('A');
Câu 2: Sửa lại câu lệnh sau cho đúng
for i:= 100 to 1000 do; writeln('A');
Câu 3: Hãy tìm hiểu chương trình sau và cho biết kết quả khi chạy chương trình:

For i:=5 to 10 do S:= S+i;
a) 20 b) 30 c) 40 d) 50
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:=5; i:=1;
while i<=5 do begin S:= S+i; i:=i+1; end;
a) 6 b) 16 c) 26 d) 36
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:=5; i:=3;
while i<=8 do begin S:= S+i; i:=i+2; end;
a) 5 b) 10 c) 15 d) 20
Câu 5: Các khai báo biến mảng trong Pascal sau đây dúng hay sai?
var A: arrray [10 52.5] of real;
Câu 5: Các khai báo biến mảng trong Pascal sau đây dúng hay sai?
var C: arrray [10.5 100] of real;
Câu 5: Các khai báo biến mảng trong Pascal sau đây dúng hay sai?
var D: arrray [10 5] of integer;
4
Câu 5: Các khai báo biến mảng trong Pascal sau đây dúng hay sai?
var n: integer; LOP: arrray [10 n] of real
Câu 6: Sửa lỗi cho đoạn chương trình sau:
* Tìm giá trị nhỏ nhất
Min:=A1;
For i:= 2 to n do
If Min > A[i] then Min:= A[i];
Writeln('so nho nhat la Min=' Min);
Câu 6: Sửa lỗi cho đoạn chương trình sau:
* Tìm giá trị lớn nhất
Max:=A[1];
For i:= 2 to n do
If Max < A[i] then Max:= A i;

Dãy BE
13 -19 20.5 10 -13 2 25
Dãy BO
15 36 -56 10
So sánh (<, >, =)
a) BE[5] và BO[4] b) BE[7] và BO[1]
Câu 8: Cho hai dãy số BE và BO
Dãy BE
13 -19 20.5 10 -13 2 25
Dãy BO
15 36 -56 10
Tính
a) BE[6] + BO[4] b) BE[2] . BO[1]
Câu 8: Cho hai dãy số BE và BO
Dãy BE
6
13 -19 20.5 10 -13 2 25
Dãy BO
15 36 10 255
So sánh (<, >, =)
a) BE[7] và BO[1] b) BE[4] và BO[3]
Câu 8: Cho hai dãy số BE và BO
Dãy BE
13 -19 20.5 10 -13 2 25
Dãy BO
15 36 -56 10
Tính
a) BE[1] -BO[3] b) BE[6] / BO[4]
7