ĐỀ THI TIN HỌC 8

Writeln j,k;Hãy cho biết lệnh Writeln in ra màn hình giá trị của j và k là bao nhiêu?

ĐỀ THI HỌC KÌ II MÔN :TIN HỌC 8 A/ Trắc nghiệm khách quan: (4 điểm-15 phút)

Khoanh tròn chữ cái đứng trước câu trả lời em cho là đúng ( mỗi câu 0,25 điểm)

1/ Cho đọan chương trình sau :

x:= 0; tong:=0;

While tong <=51 do

Begin

writeln(tong);

tong:=tong+1

End;

x:=tong;

Sau khi đọan chương trình trên được thực hiện , giá trị của x bằng bao nhiêu?

2/ Câu lệnh lặp có cú pháp là:

a.for :<biến điếm> :=<giá trị đầu> to <giá trị cuối> do < câu lệnh>;

b.for <biến điếm> :=<giá trị đầu> to <giá trị cuối> do < câu lệnh>;

c.for <biến điếm> =<giá trị đầu> to <giá trị cuối> do < câu lệnh>;

d.for <biến điếm> :=<giá trị đầu> to <giá trị cuối>; do < câu lệnh>;

3/ Câu lệnh lặp với số lần chưa biết trước có cú pháp là:

a.While :<điều kiện> do < câu lệnh>;

b.While <điều kiện> do :< câu lệnh>;

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

d.While <điều kiện> do; < câu lệnh>;

4/ Trong câu lệnh lặp

for i:=1 to 25do begin……… end;

Câu lệnh ghép được thực hiện bao nhiêu lần?

5/ Câu lệnh sau từ khóa do của lệnh lặp while…… do có thể là:

6/ Cú pháp khai báo biến mảng là:

a.Var<tên biến mảng>:array[<chỉ số đầu> <chỉ số cuối>] of < kiểu dữ liệu>;

b.Var<tên biến mảng>:array[<chỉ số cuối> <chỉ số đầu>] of < kiểu dữ liệu>;

c.Var<tên biến mảng>:array(<chỉ số đầu> <chỉ số cuối>) of < kiểu dữ liệu>;

d Var<tên biến mảng>:array[<chỉ số đầu> <chỉ số cuối>] of < kiểu dữ liệu>;

7/ Cho đoạn chương trình sau:

j:=2; k:=3;

for i:=1 to 5 do j:=j+1;

k:=k+j;

Writeln (j,k);

Hãy cho biết lệnh Writeln in ra màn hình giá trị của j và k là bao nhiêu?

a j=7; k=3 b j=1; k=10 c j=7; k=10 d j=7; k=28

8/ / Cho đoạn chương trình sau:

j:=2; k:=3;

for i:=1 to 5 do begin j:=j+1;k:=k+j end;

Writeln (j,k);

Hãy cho biết lệnh Writeln in ra màn hình giá trị của j và k là bao nhiêu?

a j=7; k=3 b j=1; k=10 c j=7; k=10 d j=7; k=28

9/ Cho đoạn chương trình sau:

i:=1 ; j:=2; k:=3;

While i<6 do i:=i+1; j:=j+1;k:=k+j;

Writeln (i,j,k);

Hãy cho biết lệnh Writeln in ra màn hình giá trị của i, j và k là bao nhiêu?

a i=6;j=3; k=6 b i=6;j=7; k=28 c i=6;j=7; k=6 d.i=6;j=3; k=28 10/ Cho đoạn chương trình sau:

i:=1;j:=2; k:=3;

While i<6 do begin i:=i+1; j:=j+1;k:=k+j end;

space:=’ ’;

Writeln ( i , space , j, space, k);

Hãy cho biết lệnh Writeln in ra màn hình giá trị của i, j và k là bao nhiêu?

a i=6;j=3; k=6 b i=6;j=7; k=28 c i=6;j=7; k=6 d.i=6;j=3; k=28 11/ Các câu lệnh Pascal sau đúng hay sai??

Đánh dấu “ X” vào ô thích hợp: ( mỗi câu 0,25 điểm)

a/ for i:=1 to 10 do x:=x+1;

b/ for i:=10 to 1 do x:=x+1;

c/ while i:=1 do t:=10

d/ kitu: array(1 255) of real;

e/ a: array[1 100] of integer;

f/ b: array[1 n] of real;

B/ Tự luận ( 6điểm -30 phút)

1/ Viết chương trình in một chữ ‘A’ trên màn hình 50 lần

2/ Viết chương trình tính tích của N số tự nhiên đầu tiên , với N là số tự nhiên được nhập từ bàn phím ( N!=1.2.3 N)

3/ Viết chương trình nhập vào một số tự nhiên N từ bàn phím và kiểm tra số đó có phải là hợp

số hay không?