Bo 4 de thi tin hoc 8 hoc ki 2 co dap an nam 2022 2023

Microsoft Word Document4 Phòng Giáo dục và Đào tạo Đề thi Học kì 2 Năm học 2021 2022 Bài thi môn Tin học lớp 8 Thời gian làm bài phút (Đề thi số 1) I PHẦN TRẮC NGHIỆM (5 điểm) Câu 1 Trong các cách kha[.]

Trang 1

Phòng Giáo dục và Đào tạo

Đề thi Học kì 2 Năm học 2021 - 2022 Bài thi môn: Tin học lớp 8

Thời gian làm bài: phút

(Đề thi số 1)

I PHẦN TRẮC NGHIỆM (5 điểm)

Câu 1: Trong các cách khai báo biến mảng dưới đây, cách khai báo nào là đúng:

A Var A: array[1 100] of integer;

B Var A:array(1 100) of integer;

C Var A:= array[1 100] of integer;

D Var A: array[1 100] of integer

Câu 2: Cho đoạn chương trình Pascal sau đây:

tong:= 20;

While tong > 10 do

tong:=tong-1;

Sau khi đoạn chương trình trên được thực hiện, giá trị của tổng bằng bao nhiêu:

A 9 B 10 C 11 D 12

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

S:= 10;

for i:= 1 to 5 do S:= S - 1;

Trang 2

A 7 B 10 C 15 D 5

Câu 4: Khi thực hiện đoạn chương trình sau:

n:=1; T:=17;

While n>20 do

begin

n:=n+5;

T:=T - n

end;

Hãy cho biết giá trị của biến T bằng bao nhiêu?

A 14 B 15 C 16 D 17

Câu 5: Khai báo biến mảng: A : array[1 7] of real; Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?

A 4 B 5 C 6 D 7

Câu 6: Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:

A Chỉ số đầu và chỉ số cuối là 2 số nguyên

B Chỉ số đầu nhỏ hơn chỉ số cuối

C Kiểu dữ liệu có thể là integer hoặc real

D Cả ba ý trên

Câu 7: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6 Khi thực hiện câu lệnh sau: tb:= 0; For i:= 1 to

5 do tb := tb + A[i]; Giá trị của biến tb là bao nhiêu?

A 20 B 18 C 21 D 22

Trang 3

Câu 8: Cho biết giá trị của biến x và y sau khi thực hiện đoạn chương trình sau: (1 điểm)

X:= 0; Y:= 3;

For i:= 1 to 4 do

X:= X + Y;

A 11 B 12 C 13 D 14

Câu 9: Em hiểu câu lệnh lặp theo nghĩa nào dưới đây?

A Một lệnh thay cho nhiều lệnh

B Vì câu lệnh đã có tên là lệnh lặp

C Các câu lệnh được viết lặp đi lặp lại nhiều lần

D Cả a, b, c đều sai

Câu 10: Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j );

Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?

A 10 lần B 5 lần C 1 lần D Không thực hiện

II PHẦN TỰ LUẬN (5 điểm)

Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên Độ dài của dãy cũng được nhập từ bàn phím

In ra màn hình có bao nhiêu giá trị là số chẵn

Đáp án & Thang điểm

Trang 4

Program Dem_Chan;

uses crt;

var i, n, Dem: integer;

A : array[1 100] of integer;

0.5 0.5

Begin

clrscr;

writeln(‘Nhap do dai cua day so, N=’);

readln(n);

0.5

writeln(‘Nhap cac phan tu cua day so:’);

For i:=1 to n do

0.5

Begin

write(‘a[‘,i,’]=’);

readln(a[i]);

End;

0.5

Dem:=0;

For i:=1 to n do

if a[i] mod 2 = 0 then

Dem:= Dem+1;

0.5 0.5 0.5 0.5

Trang 5

writeln(‘Co ’,Dem,’ so chan’);

readln

End

0.5

- Phòng Giáo dục và Đào tạo

A Var A : array(1 100) of real;

B Var A : array[1 100] of real;

C Var A := array[1 100] of real;

D Var A = array[1 100] of real;

tong:= 0;

While tong<= 10 do

tong:=tong+1;

Trang 6

A 9 B 10 C 11 D 12

S:= 0;

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

A 10 B 12 C 20 D 15

Câu 4: cho đoạn chương trình sau:

i:=1; tong:=0;

While i <= 5 do

Begin

tong:= tong + i;

i:= i + 1;

End;

Sau đoạn chương trình trên em hãy cho biết biến “tong” có giá trị bằng bao nhiêu?

A.1 B.5 C.10 D.15

Câu 5: Trong Pascal, câu lệnh nào sau đây được viết đúng?

A for i := 10 to 1 do writeln(‘A’);

B for i := 1.5 to 5.5 do writeln(‘A’);

C for i := 1 to 100 do writeln(‘A’);

D for i := 1 to 10; do writeln(‘A’);

Câu 6: Trong câu lệnh lặp: for n:= 1 to 10 do begin end;

Trang 7

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

A 10 lần; B 5 lần; C Không lần nào; D 1 lần

Câu 7: Khi giải thích các thành phần trong câu lệnh lặp, phát biểu nào sau đây đúng?

A For, to, do là các từ khóa, biến đếm là biến kiểu số nguyên hoặc số thực

B Giá trị đầu và giá trị cuối là các giá trị nguyên hoặc giá trị thực

C Câu lệnh lặp sẽ thực hiện câu lệnh nhiều lần, mỗi lần là một vòng lặp

Số lần lặp là biết trước và bằng giá trị cuối – giá trị đầu + 1

D Cả ba ý trên

Câu 8: Khai báo biến mảng: A : array[1 7] of real; Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?

A 4; B 5; C 6; D 7

Câu 9: Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:

A Chỉ số đầu và chỉ số cuối là 2 số nguyên;

B Chỉ số đầu nhỏ hơn chỉ số cuối;

C Kiểu dữ liệu có thể là integer hoặc real;

D Cả ba ý trên;

Câu 10: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6 Khi thực hiện câu lệnh sau:

tb:= 0;

For i:= 1 to 5 do tb := tb + A[i];

Giá trị của biến tb là bao nhiêu?

A 20; B 18; C 21; D 22;

Trang 8

In ra màn hình tổng các giá trị là số lẻ

Trang 10

-

Phòng Giáo dục và Đào tạo

Đề thi Học kì 2

Năm học 2021 - 2022

Bài thi môn: Tin học lớp 8

Trang 11

A Var A: array[1 100] of integer

B Var A:=array[1 100] of integer;

C Var A: array[1 100] of integer;

D Var A: array(1 100) of integer;

tong:= 0;

While tong < 10 do

tong:=tong+1;

A 9 B 10 C 11 D 12

S:= 10;

for i:= 1 to 2 do S:= S - i;

A 5 B 10 C 15 D 7

Câu 4: Trong Pascal, câu lệnh nào sau đây được viết đúng?

A for i:= 4 to 1 do writeln(‘A’);

B for i= 1 to 10 writeln(‘A’);

Trang 12

C for i:= 1 to 10 do writeln(‘A’);

D for i to 10 do writeln(‘A’);

Câu Câu 5: Trong câu lệnh lặp:

For i := 1 to 10 do j:= j + 2; write( j );

Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?

A 10 lần B 1 lần C 5 lần D Không thực hiện

Câu 6: Cho đoạn chương trình: J:= 0; For i:= 1 to 5 do J:= J + i; Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?

A 12 B 22 C 15 D 42

Câu 7: Trong Pascal, câu lệnh nào sau đây là đúng?

A S:=1;

B S:=2; While S<10 do write(S);

C n:=2 while n<5 do write(‘A’);

D Cả A và B

Câu 8: Cho đoạn chương trình:

J:= 0;

For i:= 1 to 5 do J:= J+ 1;

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

A 2 B 3 C 4 D 5

n:=1; T:=14;

While n>20 do

Trang 13

begin

n:=n+5;

T:=T – n;

end;

A 14 B 15 C 16 D 17

Câu 10: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6 Khi thực hiện câu lệnh sau:

tb:= 0;

For i:= 1 to 5 do tb := tb + A[i];

Giá trị của biến tb là bao nhiêu?

A 20; B 18; C 21; D 22;

In ra màn hình có bao nhiêu giá trị là số lẻ

Trang 14

Nội dung trả lời Điểm

Program Dem_Le;

uses crt;

var i, n, Dem: integer;

0.5 0.5

Begin

clrscr;

readln(n);

0.5

For i:=1 to n do

0.5

Begin

write(‘a[‘,i,’]=’);

readln(a[i]);

End;

0.5

Begin

write(‘a[‘,i,’]=’);

readln(a[i]);

End;

Dem:=0;

0.5 0.5 0.5 0.5

Trang 15

For i:=1 to n do

Dem:= Dem+1;

writeln(‘Co ’,Dem,’ so le’);

readln

End

0.5

- Phòng Giáo dục và Đào tạo

A Var A: array[1 5.5] of integer;

B Var A:array(1 100) of integer;

C Var A: array[1.5 100] of integer;

D Var A: array[1 100] of integer;

tong:= 20;

Trang 16

While tong>= 10 do

tong:=tong - 1;

A 19 B 9 C 21 D 10

S:= 0;

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

A 5 B 10 C 15 D 20

n:= 1; T:= 50;

While n>20 do

begin

n:=n+5;

T:=T - n

end;

A 14 B 17 C 16 D 50

Câu 5: Khai báo biến mảng: A : array[1 7] of real ; Sử dụng câu lệnh For i := 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?

A 4 B 5 C 6 D 7

Trang 17

Câu 6: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6 Khi thực hiện câu lệnh sau: tb := 0; For i := 1

to 5 do tb := tb + A[i]; Giá trị của biến tb là bao nhiêu?

A 20 B 18 C 21 D 22

Câu 7: Em hiểu câu lệnh lặp theo nghĩa nào dưới đây?

A Một lệnh thay cho nhiều lệnh

B Các câu lệnh được viết lặp đi lặp lại nhiều lần

C Vì câu lệnh đã có tên là lệnh lặp

D Cả a, b, c đều sai

Câu 8: Cho đoạn chương trình sau:

n:=1;

While n<10 do

Begin

n:=n+1;

Writeln(‘ xin chao’);

end;

Khi thực hiện chương trình câu “ xin chao” được viết ra màn hình mấy lần?

A 0 B.10 C 9 D Vòng lặp vô tận

Câu 9: Cách viết câu lệnh lặp với số lần biết trước như sau:

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

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

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

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

Trang 18

Câu 10: Cho đoạn chương trình: j := 0; k := 2;

For i := 1 to 5 do j := j + 2; k := k + j;

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

A 12; B 22; C 32; D 42

In ra màn hình tổng các giá trị là số chẵn

Program Tong_Chan;

uses crt;

var i, n, Tong: integer;

0.5 0.5

Trang 19

clrscr;

readln(n);

For i:=1 to n do

0.5

Begin

write(‘a[‘,i,’]=’);

readln(a[i]);

End;

0.5

Tong:=0;

For i:=1 to n do

Tong:= Tong+a[i];

0.5 0.5 0.5 0.5 writeln(‘Tong cac gia tri chan la:’,Tong);

readln

End

0.5

Tiêu đề	Đề thi Học kì 2 Năm học 2021 - 2022
Trường học	Phòng Giáo dục và Đào tạo ...
Chuyên ngành	Tin học lớp 8
Thể loại	Đề thi
Năm xuất bản	2022

Định dạng
Số trang	19
Dung lượng	225,25 KB