Ỳ

PHÒNG GDĐT KRÔNG ANA

Ỏ Ấ   I C P

ề

ọ

ờ

Ọ K  THI H C SINH GI HUY NỆ ọ ớ Đ  thi môn: Tin h c, l p 9 Năm h c 2021­2022 Th i gian làm bài: 150 phút

ư ượ ề ấ ấ ằ L u ý: Bài làm đ

ỗ ứ ầ

ử ụ ề ẫ ủ ả ư ệ crt  và   l nh  ệ

ữ ệ ậ ủ ả ầ Themis c a tác gi    Lê Minh c ch m b ng ph n m m ch m thi  ấ ữ ệ   ọ ậ Hoàng – Đ  Đ c Đông, vì v y thí sinh ph i tuân th  chính xác yêu c u đ c và xu t d  li u ủ clrscr,   không   ghi   ra   các   câu   d n   khi c a   đ   bài.   Không   s   d ng   th   vi n     ể nh p/xu t ư ‘Ban hay nhap vao so tu nhien N: ‘,  ‘Ket qua la ‘,... ấ  d  li u ki u nh :

ấ ả ả ớ ạ ủ ề i h n c a đ , thí sinh không

ộ ữ ệ ể ữ ệ ươ ậ Khi ch m, các b  d  li u nh p vào đ m b o đúng gi ạ ế t đo n ch ậ ng trình ki m tra d  li u nh p vào. ầ c n vi

ể ế ư (L u tên file bài làm: Câu 1. Mua hàng khuy n mãi (5 đi m). cau1.pas)

ươ ươ ử ị Nhân d p khai tr

ế ụ ể ế ả ng trình khuy n mãi gi m giá cho các   ế   ươ ng trình khuy n

ng, c a hàng An Khang có ch ề ủ ả ẩ s n ph m c a mình. Mua càng nhi u, khuy n mãi càng cao. C  th  ch ư mãi nh  sau:

ị ướ ả ồ ơ - Gi m 5% cho đ n hàng có giá tr  d i 100 000 đ ng.

ị ừ ả ế ướ ồ ơ - Gi m 8% cho đ n hàng có giá tr  t 100 000 đ n d i 1 000 000 đ ng.

ị ừ ả ơ ở

- Gi m 10% cho đ n hàng có giá tr  t

1 000 000 tr  lên.

ạ ử ổ ị ả ẩ ồ i c a hàng, t ng giá tr  s n ph m là X đ ng. Hãy cho

ẹ ả ả ả ố ề ế ắ Hôm nay m  Hoa đi mua s m t ẹ t sau khi gi m giá thì s  ti n m  Hoa ph i tr  là bao nhiêu? bi

ữ ệ ậ ừ ươ D  li u vào: nh p t ố  bàn phím s  nguyên d ng X (0

ả ả ộ ố ố ề ẹ in ra màn hình m t s  nguyên là s  ti n mà m  Hoa ph i tr  sau khi đã làm

ữ ệ ế ầ ơ D  li u ra: ị ữ ố tròn đ n ch  s  ph n đ n v .

Ví d :ụ

ậ ừ Nh p t bàn phím In ra màn hình

150000 138000

ộ ể ư (L u tên file bài làm: Câu 2. Trung bình c ng (4 đi m). cau2.pas)

1, A2, …, An. Tính giá tr  trung bình c ng c a c a dãy A.

ồ ố ủ ủ ộ ị Cho dãy A g m N s  nguyên: A

ữ ệ ậ ừ D  li u vào: nh p t bàn phím:

ậ ố ầ ươ

- Dòng đ u tiên nh p s  nguyên d

3)

ng N (0

1, A2, …, An. Trong đó |Ai| < 30000.

ứ ậ ộ

ữ ả ắ ấ ố ộ ố - Dòng th  hai nh p N s  nguyên trên m t dòng: A Gi a các s  cách nhau ít nh t m t kho ng tr ng.

ữ ệ ủ ộ ị D  li u ra: ấ  ghi ra màn hình m t s  th c duy nh t là giá tr  trung bình c ng c a dãy A

ế ộ ố ự ẩ ấ ữ ố ằ (làm tròn đ n 3 ch  s  đ ng sau d u ph y).

Trang 1

Ví d :ụ

ậ ừ Nh p t bàn phím In ra màn hình

5 4.800

4 2 10 3 5

ồ ể ư (L u tên file bài làm: Câu 3. Tr ng cây ăn trái (4 đi m). cau3.pas)

ẹ ề ộ ậ ả ấ ộ ẹ

M  Nam có m t m nh đ t hình ch  nh t có chi u dài N mét, chi u r ng M mét. M ớ ữ ấ ề ắ ư ả ồ ố Nam mu n tr ng cây ăn trái lên m nh đ t đó v i quy t c nh  sau:

ẽ ượ ọ ủ ả ẳ ồ

- Cây s  đ

ấ c tr ng th ng hàng theo hàng ngang và d c c a m nh đ t

- Hàng cách hàng 3 mét.

- Cây cách cây 3 mét.

ừ ố ế ườ ủ ả ấ ấ ả - Kho ng cách t g c cây đ n đ ng biên c a m nh đ t ít nh t 1,5 mét.

ể ồ ẹ ỏ ượ ấ ủ H i m  Nam có th  tr ng đ c bao nhiêu cây ăn trái trên đ t c a mình?

ố ươ ữ ộ ố D  li u vào: ng N, M trên m t dòng, gi a 2 s  cách

ậ ừ  nh p t ả ữ ệ ằ ộ ớ bàn phím 2 s  nguyên d ắ nhau b ng m t kho ng tr ng. (v i 0

ữ ệ ể ồ ẹ ấ ố ố ượ D  li u ra: in ra màn hình s  nguyên duy nh t là s  cây mà m  Nam có th  tr ng đ c.

Ví d :ụ

ậ ừ Nh p t bàn phím In ra màn hình

30 20 60

ượ ể ấ ư (L u tên file bài làm: ộ Câu 4. Đ i bóng đ c yêu thích nh t (4 đi m). cau4.pas)

ả ườ ộ Trong gi i bóng đá thi u niên năm 2020 c a tr

ế ỗ ộ ồ ố ồ ủ ủ ự ồ : Ký t

ụ ủ ầ ộ ng X có 4 đ i bóng tham gia, g m có các ự ủ ầ  tên ộ  c a c u th . Ví d : Đ i A có các c u th  A01, A02, …, A10; đ i B

ầ ầ ộ đ i A, B, C và D. M i đ i g m có 10 c u th , các c u th  có mã s  g m 3 ký t ủ ự ố ứ ự ủ ầ ộ  s  th  t đ i + 2 ký t ủ có các c u th  B01, B02, …, B10; …

ầ

ủ ủ ượ ọ ng trình bình ch n c u th  đ ả ọ ủ ượ t bình ch n c a khán gi ấ  dành cho các c u th . Ti n đây ban t

ươ ổ ứ  ch c có ch Ban t ộ c m t danh sách các l ố ượ ố ộ ấ c yêu thích nh t. Đ i bóng đ

ổ ứ ầ ấ ộ

ọ ượ ố ượ ằ ọ ổ ứ ậ   c yêu thích nh t. Ban t  ch c nh n ượ ổ  ệ ầ đ ộ ứ ượ   c yêu thích ch c cũng mu n th ng kê xem đ i bóng nào đ ấ ề ộ ủ ố ượ ộ ấ   t bình ch n dành cho các c u th  trong đ i nhi u nh t. Em hãy nh t là đ i có t ng s  l ẽ ế ằ ộ ổ  ch c tìm ra đ i bóng đ giúp ban t   t r ng s  không có 2 đ i bóng ấ ượ c yêu thích nh t mà có s  l cùng đ c yêu thích nh t. Bi t bình ch n b ng nhau.

ữ ệ ậ ừ D  li u vào: nh p t bàn phím:

ầ ậ ố ươ ố ượ

- Dòng đ u tiên nh p vào s  nguyên d

ng N (N<1000) là s  l ọ ủ t bình ch n c a khán

giả

Trang 2

ố ầ ủ ượ ế ậ ỗ ộ ọ

- N dòng ti p theo, m i dòng nh p m t mã s  c u th  đ

c bình ch n

ộ ổ D  li u ra: in ra màn hình tên đ i bóng đ ấ c yêu thích nh t và t ng s  l t khán gi ả

ủ ộ ằ ả ầ ộ ố ượ ắ ượ ầ ữ ệ ọ bình ch n cho các c u th  đ i đó, hai thành ph n cách nhau b ng m t kho ng tr ng.

Ví d :ụ

ậ ừ Nh p t bàn phím In ra màn hình

B 3 6

B04

D05

B03

A01

B04

D05

ư Câu 5. Tam giác cân (3 đi mể ). (L u tên file bài làm: cau5.pas)

ạ ằ ộ Tam giác cân là tam giác có đ  dài 2 c nh b ng nhau.

ươ ố ng A

ồ ấ ố ố ấ ỳ ạ ầ ộ ộ

Cho dãy A g m N s  nguyên d ể ạ i quá 2 l n. L y 3 s  b t k  trong dãy A đ  t o ra m t tam giác có đ  dài 3 c nh là 3 s ể ạ ư ế ỏ ớ ặ   1, A2, … , An, trong đó không có s  nguyên nào l p ố  tam giác cân khác nhau từ

ạ l nguyên đó. V i cách làm nh  th , h i có th  t o ra bao nhiêu  dãy A.

ữ ệ ậ ừ D  li u vào: nh p t bàn phím:

ứ ấ ậ ố ươ ầ ử ủ

- Dòng th  nh t nh p s  nguyên d

ố ng N là s  ph n t c a dãy A (N<100).

1, A2, … , An trên 1 dòng, m i s  cách

ố ươ ỗ ố ng A

ả ộ ậ ứ - Dòng th  hai nh p vào N s  nguyên d ắ nhau m t kho ng tr ng.

ộ ố ấ ố D  li u ra: in ra màn hình m t s  nguyên duy nh t là s  tam giác cân khác nhau có th ể

ư ầ ữ ệ ừ ạ t o ra t dãy A nh  yêu c u bài toán.

Ví d :ụ

ậ ừ Nh p t bàn phím In ra màn hình

6 5

2 5 3 2 1 3

ả ạ ớ Gi i thích: có 5 tam giác cân v i các c nh là {2, 2, 1}, {2, 2, 3}, {3, 3, 1}, {3, 3, 2}, {3, 3, 5}

­­­­­­­­­­­­­­­­­­­­­ H tế  ­­­­­­­­­­­­­­­­­­­­­

Trang 3

ộ ả (Cán b  coi thi không gi i thích gì thêm)

ọ H  và tên thí sinh  ..................................................... SBD...........................

ữ ị ữ ị Ch  ký giám th  1 Ch  ký giám th  2

Trang 4

PHÒNG GD&ĐT KRÔNG ANA

Ỳ

Ỏ Ấ

Ệ

Ọ K  THI H C SINH GI

I C P HUY N

ọ ớ

Môn: Tin h c, l p 9

ọ

Năm h c 2021­2022

Ể

Ể

ĐÁP ÁN VÀ BI U ĐI M

ế ể Đáp án câu 1. Mua hàng khuy n mãi (5 đi m)

ươ ả

a) Ch

ng trình tham kh o

program cau1;

var x: longint;

t: real;

begin

readln(x);

if x< 100000 then t:= x*95/100

else if x<1000000 then t:=x*92/100

else t:=x*90/100 ;

writeln(t:0:0);

end.

ộ b) B  test

ậ ừ ả bàn phím

ữ ệ D  li u nh p t 20000 85000 150000 888888 2000000 ế K t qu  ghi ra màn hình 19000 80750 138000 817777 1800000 Đi mể 1 1 1 1 1

Trang 5

ộ ể Đáp án câu 2. Trung bình c ng (4 đi m)

ươ ả

a) Ch

ng trình tham kh o

program cau2;

var n,i,x: integer;

t: real;

begin

readln(n);

for i:= 1 to n do

begin

read(x);

t:=t+x;

end;

writeln(t/n:0:3);

end.

ộ b) B  test

ả ế ữ ệ ậ ừ Đi mể D  li u nh p t bàn phím

Tes t 1 K t qu  ghi ra màn hình 4.333 0,5

2 5.300 0,5

3 22.500 0,5

4 9.300 0,5

5 11753.000 0,5

6 2718.250 0,5

7 6 1 3 8 2 6 6 10 9 0 1 7 7 4 8 5 9 3 10 22 46 30 6 45 19 2 26 8 21 20 16 2 18 15 15 11 14 10 11 5 1 13 10 2 2 0 2 7 14 18 5 9453 18919 14155 4145 12093 20 ­2742 18412 12871 ­15714 15118 18857 6800 12908 9012  9635 ­14542 ­2553 ­4988 ­11140 9625 ­7326 10465 ­9180  ­11680 10527 50 ­2155.900 0,5

Trang 6

8 7020.845 0,5

­20733 7305 ­96 ­8399 7668 8616 ­4234 ­1432 345 7990  ­14122 10788 ­5025 ­3962 16668 11124 ­14445 446 9568  ­17101 ­643 5339 ­2323 ­713 ­1000 ­18258 ­4915 ­21423  ­17806 11221 ­21822 ­6798 ­22514 ­7515 5590 3075 8091  7721 8223 17570 ­13688 ­11730 ­2541 836 ­18858 2022  ­17230 13150 7683 492 110 1847 5340 7977 5710 8483 3711 10453 12677 193 6750  1442 3841 1505 8224 4885 2643 3289 7130 1284 4607  13833 5830 6995 3895 6152 4428 11748 4334 754 ­8 1412  ­20718   19215   9297   12128   2330   4002   15534   7104   2166  3460 15476 ­61 12958 4799 10345 2631 8280 1721 6241  14272   6775   119   18034   11865   14438   10189   23853   9776  1175 9493 2394 14039 5369 6637 2268 6509 7772 5688  3690 8530 13405 5722 2066 4828 310 13162 12878 8271  6146 16899 4465 7498 16415 9573 20088 4694 4837 7640  1238 4716 14811 6568 6022 4103 6004 4491 5799 16549  2119 7557 13109 13383 3754 6313 2182 7774 17866 509  7372

ồ ể Đáp án câu 3. Tr ng cây ăn trái (4 đi m)

ươ ả

a) Ch

ng trình tham kh o

program cau3;

var m,n,t: integer;

begin

readln(n,m);

t:=(n div 3)*(m div 3);

writeln(t);

end.

ộ b) B  test

ừ ậ ữ ệ ả Test bàn Đi mể

1 2 D   li u   nh p   t phím 30 20 33 9 ế K t qu  ghi ra màn hình 60 33 0,5 0,5

Trang 7

3 4 5 6 7 8 100 50 50 40 100 100 150 25 45 20 60 60 528 208 1089 400 90 400 0,5 0,5 0,5 0,5 0,5 0,5

ộ ượ ể ấ Đáp án câu 4. Đ i bóng đ c yêu thích nh t (4 đi m)

ươ ả

a) Ch

ng trình tham kh o

{cách 1}

program cau4;

var s: string;

dema,demb,demc,demd: integer;

doi:char;

n,i, max:integer;

begin

readln(n);

for i:=1 to n do

begin

readln(s);

if s[1]='A' then dema:=dema+1;

if s[1]='B' then demb:=demb+1;

if s[1]='C' then demc:=demc+1;

if s[1]='D' then demd:=demd+1;

end;

doi:='A' ;

max:=dema;

Trang 8

if max

begin

doi:='B';

max:=demb;

end;

if max

begin

doi:='C';

max:=demC;

end;

if max

begin

doi:='D' ;

max:=demd;

end;

writeln(doi,' ',max);

end.

{cách 2}

program cau4;

var a: array['A'..'D'] of integer;

s: string;

cmax,c: char;

i, n: integer;

begin

readln(n);

Trang 9

for i:= 1 to n do

begin

readln(s);

a[s[1]]:= a[s[1]] +1;

end;

cmax:='A';

for c:='B' to 'D' do

if a[cmax]

writeln(cmax, ' ',a[cmax]);

end.

ộ b) B  test

ậ ừ ế Test Nh p t bàn phím Đi mể

ả K t   qu   ghi   ra màn hình A 5 1 1

2 B 3 1

3 C 5 1

8 A02 B04 A02 A01 A05 A02 C01 C01 6 A05 B01 B01 C02 B01 C02 10 D01 A01 A02 D01 C05

Trang 10

C05 C07 A01 C05 C05

4 D 3 1

6 B10 B10 D02 D02 D02 C08

Đáp án câu 5. Tam giác cân (3 đi m)ể

ươ ả

a) Ch

ng trình tham kh o

program cau5;

var a: array[1..100] of integer;

t,n,i,j,dem,k: integer;

begin

readln(n);

for i:=1 to n do read(a[i]);

for i:=1 to n­1 do

for j:= i+1 to n do

if a[i]>a[j] then

begin

t:=a[i];

a[i]:=a[j];

a[j]:=t;

end;

Trang 11

//for i:=1 to n do write(a[i],' ');

k:=0;

dem:=0;

for i:=1 to n­1 do

begin

k:=0;

if a[i]=a[i+1] then

for j:=1 to n do

if (j<>i) and (j<>i+1) and (a[j] < a[i] + a[i+1]) and(k<>a[j])

then

begin

k:=a[j];

dem:=dem+1;

end;

end;

writeln(dem);

end.

ộ b) B  test

ậ ừ ế Test Nh p t bàn phím Đi mể

1 ả K t   qu   ghi   ra màn hình 4 0,3

2 0,3 2

3 0,3 8

4 0,3 3

5

0,3

0

6 1 3 3 2 4 5 6 1 3 2 2 4 5 8 3 6 6 4 4 10 7 9 5 5 5 6 1 2 4 3 5 6 8

Trang 12

6

12

0,3

7

9

0,3

8

19

0,3

9

13

0,3

10

14

0,3

10 9 6 3 2 4 2 3 4 6 7 7 4 5 4 3 2 3 5 15 1 2 3 4 5 6 7 5 3 1 6 9  11 12 13 20 6 20 30 40 5 20 10 19  31 11 34 32 41 56 4 2 1  66 100 27 20 5 20 30 40 5 20 10 19  31 11 34 32 41 56 4 2 1  66 100 46

Trang 13