de ktr tin 8 hk2 day

<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1>

<b>Phòng giáo dục huyện Tiền Hải</b>

<b>Trường THCS Nam Thanh</b>

<b> ĐỀ KIỂM TRA HẾT HỌC KỲ II </b>

<b>_{MÔN: TIN HỌC 8}</b>

<b>I TRẮC NGHIỆM: (4đ)</b>

<i><b>Chọn ý trả lời đúng (mỗi ý đúng được 0,5đ)</b></i>

Câu 1: Trong ngôn ngữ lập trình Pascal, tên nào là hợp lệ?
a) Tam giac; b) Tamgiac; c) Begin; d) End.
Câu 2: Trong Pascal, khai báo nào sau đây sai?

a) Var a = integer; b) Const b:=3;
c) a: array[1..5,5] of integer; d) Tất cả đều sai.
Câu 3. Trong ngơn ngữ lập trình, phép gán nào là hợp lệ?

a) a ← 3; b) a:=3; c) a = 3; d) a: 3.

Câu 4: Câu lệnh lặp For i:=3 to 10 do Begin ..end; vòng lặp thực hiện bao nhiêu
lần

a) Không lần nào; b) 7 lần; c) 8 lần; d) 10 lần.
Câu 5:Mỗi câu lệnh sau đây:

 If ( 45 mod 3) = 0 then x: = x+1;
If x>10 then x: = x+1;

giá trị của biến X sẽ là bao nhiêu, nếu trước đó giá trị của X bằng 5?
a) 6-11; b) 7 - 11; c) 6 - 5; d) 7 - 5.

Câu 6: Sau khi thực hiện đoạn chương trình sau, giá trị của biến j bằng bao nhiêu?

j:=0;

For i:=0 to 5 do j:=j+2;

a) 1; b) 5; c) 8; d) 12

Câu 7: Cho biết giá trị của c ở đoạn chương trình sau bằng bao nhiêu:
a:=3; b:=5;

if a+ b <=8 then c: = a- b

a) 1; b) 5; c) -2; d) 2

Câu 8: Cho biết kết quả của đoạn chương trình sau:
a:=10;

While a>=10 do Write(a);

a) Viết ra được vô số chữ ‘a’; b) Khơng in ra cái gì;
c) viết ra 1 chữ ‘a’; d) viết ra 10 chữ ‘a’

<b>II.TỰ LUẬN: (6đ)</b>

Câu 1: Viết và giải thích cú pháp của câu lệnh lặp với số lần chưa biết trước trong
Pascal. (2đ)

Câu 2. Hãy cho biết tác dụng của câu lệnh lặp?(2đ)
Câu 3. Sửa lỗi chương trình sau: (2đ)

Program Tinhtong;

Var N, i: integer;

S: Longint;
Begin

Write(‘Nhap so N = ’); Readln(N);
S:=0;

For i = 1 to N do S:=S+i;

Writeln(‘Tong cua ‘,N,’ so tu nhien dau tien S = ‘,S);
Readln

End

</div>
<span class='text_page_counter'>(2)</span><div class='page_container' data-page=2>

<b>Phòng giáo dục huyện Tiền Hải</b>

<b>Trường THCS Nam Thanh</b>

<b>ĐÁP ÁN ĐỀ KIỂM TRA HẾT HỌC KỲ II </b>

<b>_{MÔN: TIN HỌC 8}</b>

<b>I. Phần trắc nghiệm:</b>

Mỗi câu trả lời đúng được 0,5đ

Câu

1

2

3

4

5

6

7

8

Đáp án

B

D

A

C

C

D

C

A

<b>II. Phần tự luận: </b>

<b>Câu 1.</b>

<b>Cú pháp của câu lệnh lặp với số lần chưa biết trước trong ngơn</b>

<b>ngữ lập trình Pascal:</b>

While <điều kiện> do <câu lệnh>; (1đ)

Câu lệnh lặp được thực hiện:

(1đ)

Bước 1. Kiểm tra điều kiện.

Bước 2. Nếu điều kiện không được thoả mãn (sai), câu lệnh sẽ bị bỏ qua

và lệnh lặp kết thúc. Nếu điều kiện được thoả mãn (đúng), thực hiện câu

lệnh và quay lại bước 1.

<b>Câu 2.</b>

<b>Tác dụng của câu lệnh lặp:</b>

Giúp cho công việc lập trình được đơn giản hơn vì chỉ cần viết 1 câu lệnh

hay một nhóm các câu lệnh thay cho rất nhiều câu lệnh hay nhóm các câu

lệnh phải viết

<b>Câu 3.</b>

<b>Sửa lỗi chương trình sau:</b>

Program Tinhtong;

Var N, i: integer; S: Longint;

Begin

Write(‘Nhap so N = ’); Readln(N);

S:=0;

For i := 1 to N do S:=S+i; { Sai phép gán}

Writeln(‘Tong cua ‘,N,’ so tu nhien dau tien S = ‘,S);

Readln

End. { thiếu dấu chấm sau end}

</div>

<!--links-->