Cộng đồng chia sẻ tri thức Lib24.vn

Đề thi học kì 2 Tin 8 trường THCS Hoa Lư

da750f4a4ef56103df8f3b3d62eb8584
Gửi bởi: Nguyễn Minh Lệ 24 tháng 10 2021 lúc 22:53:46 | Được cập nhật: hôm qua lúc 23:38:18 | IP: 14.245.249.146 Kiểu file: DOC | Lượt xem: 86 | Lượt Download: 0 | File size: 0.18176 Mb

Nội dung tài liệu

Tải xuống
Link tài liệu:
Tải xuống

Các tài liệu liên quan


Có thể bạn quan tâm

Thông tin tài liệu

TRÖÔØNG THCS AN HIEÄP KEÁ HOAÏCH TUAÀN

Trường THCS Hoa Lư

Họ Tên : . . . . . . . . . . . . . . . . . . . . .

Lớp : 8……

Đề Kiểm Tra HK II

Môn Tin Học lớp 8

Thời gian : 45 phút

Đề 1

Điểm

I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3.5 đ )

Thí sinh chọn chữ cái chỉ kết quả mà em chọn là đúng và ghi vào tờ giấy làm bài.

Caâu 1: Caâu leänh laëp while…do coù daïng ñuùng laø:

A) While <ñieàu kieän> do; <caâu leänh>; B) While <ñieàu kieän> <caâu leänh> do;

C) While <caâu leänh> do <ñieàu kieän>; D) While <ñieàu kieän> do <caâu leänh>;

Câu 2 : Hãy cho biết số lần lặp của câu lệnh for sau đây: “for i:=1 to 12 do …..”

A. 13 lần B. 12 lần C. 11 lần D. 10 lần

Caâu 3: Thöïc hieän ñoaïn leänh sau, x nhaän giaù trò bao nhieâu:

x:=7; if (x mod 3 = 2) then x:= x +1;

a) x=7 b)x=8 c) x=0 d) x=10

Caâu 4: Ñeå tính toång S=2 + 4 + 6 + … + n; em choïn ñoaïn leänh:

a) for i:=1 to n do b) for i:=1 to n do

S:= S + i ; if ( i mod 2=1) then S:=S + i;

c) for i:=1 to n do d) for i:=1 to n do

if ( i mod 2<>0) then S:=S + i; if ( i mod 2=0) then S:=S + i;

Caâu 5: Cấu trúc rẽ nhánh dạng đầy đủ trong ngôn ngữ lập trình Pascal có dạng:

A. if <câu lệnh 1> then <câu lệnh 2>;

B. if <điều kiện1> then <câu lệnh1>;

C. if <điều kiện> then < câu lệnh 1> else <câu lệnh 2>;

D. if <điều kiện> then <câu lệnh>;

Caâu 6: Ñeå tính toång S=1/1+1/2 +1/3 + 1/4 + … +1/n; em choïn ñoaïn leänh:

a)for i:=1 to n do

if ( i mod 2=0) then S:=S + 1/i;

b)for i:=1 to n do

if ( i mod 2=0) then S:=S + i Else S:= S + I;

c)for i:=1 to n do

S:=S + 1/i;

d)for i:=1 to n do

if ( i mod 2<>0) then S:=S + 1/i

Else S:=S-1/i;

Caâu 7: Sau khi thöïc hieän chöông trình j:= 1; for i:= 1 to 3 do j:=j+2; thì giaù trò j in ra maøn hình laø?

a) 10 b) 6 c) 8 d)7

Câu 8: Câu lệnh nào sai :

A. While X<n do m:=m+1; B. While X>n do m:=m+1;

C. While X<n do begin m:=m+1;x:=x+3 end; D. While X:=n do m:=m+1;

Caâu 9: Choïn khai baùo hôp leä

a) Var n: real;

Var a,b: array[1:n] of real;

c) Const n=5;

Var a,b: array[1..n] of real;

b) Var a,b: array[100..1] of real;

d) Var a,b: array[1.5..10.5] of real;

Caâu 10: Laàn löôït thöïc hieän ñoaïn leänh: a[1]:=2; a[2]:=3; t:=(a[1]+a[2])*2+1; Giaù trò cuûa t laø

a) t=1 b) t=11 c) t=10 d) t=6

Câu 11: Dòng lệnh : For i:=0 to 1 do writeln('xx') sẽ :

A. Chép ra hai hàng chứa kí tự "xx" B. Chép ra một hàng chứa kí tự "xx"

C. Chép ra ba hàng chứa kí tự "xx" D. Chép ra một hàng chứa kí tự "xxxx"

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

A. if x:=5 then; a=b B. if; x>5 then a:=b

C. if x>5; then a:=b D. if x>5 then a:=b else b:=a;

Caâu 13: Tính giá trị của tong khi thực hiện đoạn chương trình

tong:=0; While tong<=20 do tong:=tong+5;

a. 20 b. 25 c. 0 d. Không xác định được

Caâu 14: Đoạn lệnh sau đây:

so:=1; while so<=10 do write(so); so:=so+1;

a. In ra các số từ 1 đến 9 b. In ra các số từ 1 đến 10

c. In ra vô hạn các số 1 d. Không phương án nào đúng

Ghi đáp án vào ô:

1

2

3

4

5

6

7

8

9

10

11

12

13

14

II - PHẦN TỰ LUẬN : (6.5 đ)

Caâu 1. Mỗi câu lệnh dưới đây, giá trị của biến x sẽ là bao nhiêu, nếu trước đó giá trị của x:=5 (2 đ)

a. If (x mod 3=2) then x:=x+2;

X=

b. If (x mod 3=0) or (x>=5) then x:=x*2;

X=

c. If (x mod 2=1) and (x>10) then x:=0;

X=

d. If x<10 then x:=x;

X=

Caâu 2. Haõy chæ ra loãi cuûa ñoaïn chöông trình sau, sửa lại thành chương trình hoàn chỉnh: (2,5ñ)

Use Crt;

Var i, n : integer

Tong = longint;

Begin

Clrscr;

i=0; tong:=0;

While i:=10 do

Begin

If( i mod 4) = 0 then

tong:=tong+i;

i=i+1;

End.

Writeln(Tong so chia het cho 4:,tong);

Readln;

End;

Câu 3: Viết chương trình s= 1 + 3 + 5 + ... + n (bằng while..do) (2đ)

Trường THCS Hoa Lư

Họ Tên : . . . . . . . . . . . . . . . . . . . . .

Lớp : 8……

Đề Kiểm Tra HK II

Môn Tin Học lớp 8

Thời gian : 45 phút

Đề 2

Điểm

I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3.5 đ )

Thí sinh chọn chữ cái chỉ kết quả mà em chọn là đúng và ghi vào tờ giấy làm bài.

Câu 1: Lệnh lặp nào sau đây là đúng?

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

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

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

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

Câu 2: Ñeå tính toång S=1 + 3 + 5 + … + n; em choïn ñoaïn leänh:

a)for i:=1 to n do

S:= S + i ;

b)for i:=1 to n do

if ( i mod 2=1) then S:=S + i;

c)for i:=1 to n do

if ( i mod 2<>0) then S:=S + 1;

d)for i:=1 to n do

if ( i mod 2=0) then S:=S + i;

Câu 3: Giá trị của S khi thực hiện đoạn chương trình sau, sẽ là:

S:=0; While s<=6 do s:=s+2;

a) 4 b)8

c) 6 d) Không xác định

Câu 4: i:=1; j:= 2;

while i<=3 do i:=i+2; j:=j+i;

Sau đoạn trên, giá trị của i sẽ bằng

a.3 b.5 c.8 d.Giá trị khác

Sau đoạn trên, giá trị của j sẽ bằng

a.3 b.5 c.7 d.9

Câu 5: Lệnh sau đây lặp bao nhiêu lần? for i:= 0 to 11 do write(‘A’);

a. 0 lần b. 10 lần c. 11 lần d. 12 lần

Caâu 6. Choïn khai baùo hôp leä:

a) Var n: real;

Var a,b: array[1..n] of real;

c) Const n=5;

Var a,b: array[1..n] of real;

b) Var a,b: array[100..1] of real;

d) Var a,b: array[1.5..10.5] of real;

Câu 7: Câu lệnh nào sai :

A. While X<n do m:=m+1; B. While X>n do m:=m+1;

C. While X<n do begin m:=m+1;x:=x+3 end; D. While X:=n do m:=m+1;

Câu 8: Dòng lệnh : For i:=0 to 1 do write('00') sẽ :

A. Chép ra hai hàng chứa kí tự "00" B. Chép ra một hàng chứa kí tự "00"

C. Chép ra ba hàng chứa kí tự "00" D. Chép ra một hàng chứa kí tự "0000"

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

A. if x>5 then a:=b else b:=a; B. if; x>5 then a:=b

C. if x>5; then a:=b D. if x:=5 then; a=b

Caâu 10: Caâu leänh laëp while…do coù daïng ñuùng laø:

A) While <ñieàu kieän> do; <caâu leänh>; B) While <ñieàu kieän> <caâu leänh> do;

C) While <ñieàu kieän> do <caâu leänh>; D) While <caâu leänh> do <ñieàu kieän>;

Câu 11: Laàn löôït thöïc hieän ñoaïn leänh: a[1]:=2; a[2]:=3; t:=(a[1]+a[2])*2; Giaù trò cuûa t laø

a) t=1 b) t=11 c) t=10 d) t=6

Caâu 12: Ñeå tính toång S=1/2 + 1/4 + … +1/ n; em choïn ñoaïn leänh:

a) for i:=1 to n do

if ( i mod 2=0) then S:=S + 1/i;

b) for i:=1 to n do

if ( i mod 2=1) then S:=S + 1/i;

c) for i:=1 to n do

if ( i mod 2=1) then S:=S + 1/i Else S:= S + 1;

d) for i:=1 to n do

if ( i mod 2=0) then S:=S + 1/i Else S:= S + 1;

Câu 13: Thöïc hieän ñoaïn leänh sau, x nhaän giaù trò bao nhieâu:

x:=7; if (x mod 3 = 2) then x:= x +1;

a) x=7 b)x=8 c) x=0 d) x=10

Ghi đáp án vào ô:

1

2

3

4 i=

4 j=

5

6

7

8

9

10

11

12

13

II - PHẦN TỰ LUẬN : ( 6.5 đ)

Câu 1 Cho x :=1; Hãy tính giá trị của x khi thực hiện các lệnh (2đ)

Lệnh

Kết quả của x

a. If (1+2=3) then x:=x+1

b. If (1+1=3) or (2+2=3) then x:=x+2

c. If (2+3=5) and (3+4=7) then x:=x*3

e. If (45 mod 3=0) then x:=x+1;

x =

x =

x =

x =

Caâu 2. Haõy chæ ra loãi cuûa ñoaïn chöông trình sau, sửa lại thành chương trình hoàn chỉnh: (2.5ñ)

Uses Rct;

Var i, n : interger;

Tong : longint

Begin

Clrscr;

tong=0;

For i=1 to 10 do

Begin

If( i mod 4) = 0 then

tong=tong+i;

End.

Writeln(Tong so chia het cho 4:,tong);

Readln;

End;

Câu 3: Viết chương trình s= 2 + 4 + 6 + ... + n (bằng while..do)

Trường THCS Hoa Lư

Họ Tên : . . . . . . . . . . . . . . . . . . . . .

Lớp : 8……

Đáp án Kiểm Tra HK II

Môn Tin Học lớp 8

Thời gian : 45 phút

Đề 1

Điểm

I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3.5 đ )

1

2

3

4

5

6

7

8

9

10

11

12

13

14

d

b

a

d

c

c

d

d

c

b

a

d

b

c

II - PHẦN TỰ LUẬN : (6.5 đ)

Caâu 1. Mỗi câu lệnh dưới đây, giá trị của biến x sẽ là bao nhiêu, nếu trước đó giá trị của x:= 5 (2 đ)

a. If (x mod 3=2) then x:=x+2;

X=7

b. If (x mod 3=0) or (x>=5) then x:=x*2;

X=10

c. If (x mod 2=1) and (x>10) then x:=0;

X=0

d. If x<10 then x:=x;

X=5

Caâu 2. Haõy chæ ra loãi cuûa ñoaïn chöông trình sau, sửa lại thành chương trình hoàn chỉnh: (2,5ñ)

Use Crt;

Uses Crt;

Var i, n : integer

Var i, n : integer;

Tong = longint;

Tong : longint;

Begin

Begin

Clrscr;

Clrscr;

i=0; tong:=0;

i:=0; tong:=0;

While i:=10 do

While i<=10 do

Begin

Begin

If( i mod 4) = 0 then

If( i mod 4 = 0) then

tong:=tong+i;

tong:=tong+i;

i=i+1;

i:=i+1;

End.

End;

Writeln(Tong so chia het cho 4:,tong);

Writeln(‘Tong so chia het cho 4:’,tong);

Readln;

Readln;

End;

End.

Câu 3: Viết chương trình s= 1 + 3 + 5 + ... + n (bằng while..do)

Uses crt;

Var n,i : integer;

S : real;

Begin

Writeln(‘hay nhap n:’);

Readln(n);

S:=0;

i:=1;

While i<=n do

Begin s:=s+i;

i:=i+2;

end;

writeln(‘tong s la:’, s);

readln;

end.

Trường THCS Hoa Lư

Họ Tên : . . . . . . . . . . . . . . . . . . . . .

Lớp : 8……

Đề 2

Điểm

Đáp án Kiểm Tra HK II

Môn Tin Học lớp 8

Thời gian : 45 phút

I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3.5 đ )

1

2

3

4i

4j

5

6

7

8

9

10

11

12

13

b

B

b

B

c

d

c

d

d

a

c

c

a

a

II - PHẦN TỰ LUẬN : ( 6.5 đ)

Câu 1 Cho x :=1; Hãy tính giá trị của x khi thực hiện các lệnh (2đ)

Lệnh

Kết quả của x

a. If (1+2=3) then x:=x+1

b. If (1+1=3) or (2+2=3) then x:=x+2

c. If (2+3=5) and (3+4=7) then x:=x*3

e. If (45 mod 3=0) then x:=x+1;

x =2

x =1

x = 3

x = 2

Caâu 2. Haõy chæ ra loãi cuûa ñoaïn chöông trình sau, sửa lại thành chương trình hoàn chỉnh: (2.5ñ)

Uses Rct;

Uses crt;

Var i, n : interger;

Var i, n : integer;

Tong : longint

Tong : longint;

Begin

Begin

Clrscr;

Clrscr;

tong=0;

Tong:=0;

For i=1 to 10 do

For i:=1 to 10 do

Begin

Begin

If( i mod 4) = 0 then

If( i mod 4 = 0) then

tong=tong+i;

Tong:=tong+i;

End.

End;

Writeln(Tong so chia het cho 4:,tong);

Writeln(‘Tong so chia het cho 4:’,tong);

Readln;

Readln;

End;

End.

Câu 3: Viết chương trình s= 2 + 4 + 6 + ... + n (bằng while..do)

Uses crt;

Var n,i : integer;

S : real;

Begin

Writeln(‘hay nhap n:’);

Readln(n);

S:=0;

i:=2;

While i<=n do

Begin s:=s+i;

i:=i+2;

end;

writeln(‘tong s la:’, s);

readln;

end.