Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án)

 Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án) - DeThiTinHoc.net
 PHÒNG GDĐT KRÔNG ANA KỲ THI HỌC SINH GIỎI CẤP HUYỆN
 ĐỀ CHÍNH THỨC Đề thi môn: TIN HỌC
 Năm học 2022-2023
 Thời gian làm bài: 150 phút
Câu 1 (5 điểm): Tam giác vuông
 Cho tam giác có độ dài các cạnh lần lượt là a, b, c (<65000). Tam giác đó có phải là
tam giác vuông hay không?
 Yêu cầu:
 - Nhập vào từ bàn phím các số nguyên a, b, c.
 - Xuất ra màn hình số 1 nếu là tam giác vuông, số 0 nếu không phải là tam giác vuông.
Ví dụ:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 8 6 10 1
Thí sinh lưu bài với tên Bai1.* (trong đó .* là phần mở rộng của phần mềm thí sinh dùng
để lập trình, ví dụ .pas, .cpp...)
Câu 2 (4 điểm): Tổng các số chia hết cho 3
 Cho mảng số N nguyên (N<100), tìm và tính tổng các số lẻ chia hết cho 3.
 Yêu cầu:
 - Nhập vào từ bàn phím số nguyên N và N số nguyên trên 2 dòng khác nhau.
 - Xuất ra màn hình dòng 1 chứa các số lẻ chia hết cho 3, cách nhau bởi dấu cách.
Dòng 2 tính tổng các số vừa xuất ra.
Ví dụ:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 8 3 -9
 2 -7 3 6 12 -9 18 22 -6
Thí sinh lưu bài với tên Bai2.* (trong đó .* là phần mở rộng của phần mềm thí sinh dùng
để lập trình, ví dụ .pas, .cpp...)
Câu 3 (4 điểm): Tính tiền điện
 Bảng giá bán lẻ điện sinh hoạt hộ gia đình năm 2022 được tạm tính theo thang bậc sử
dụng như sau:
 Từ 0à50 kWh giá 1678 đồng/kWh
 Từ 51à100 kWh giá 1734 đồng/kWh
 Từ 101 kWh trở lên giá 2014 đồng/kWh
 Hãy lập trình tính tiền điện của hộ gia đình dựa trên chỉ số công tơ cũ và mới.
 Yêu cầu: Dữ liệu từ tệp Bai3.inp chứa chỉ số công tơ cũ và mới trên cùng một dòng.
Kết quả tính tiền được xuất ra tệp Bai3.out.
Ví dụ:
 Bai3.inp Bai3.out
 DeThiTinHoc.net Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án) - DeThiTinHoc.net
 ĐÁP ÁN VÀ BIỂU ĐIỂM
 Thí sinh có thể làm bài bằng nhiều cách, nhiều ngôn ngữ lập trình khác nhau. Bài làm
đúng đến đâu, chấm điểm đến đó. Sau đây là một số chương trình tham khảo viết bằng ngôn
ngữ lập trình Pascal.
Câu 1 (5 điểm): Tam giác vuông
 Khai báo Var a,b,c: word; 2đ
 Begin
 Read(a,b,c);
Nhập; câu If (sqr(a)=sqr(b)+sqr(c)) or
lệnh điều (sqr(b)=sqr(a)+sqr(c)) or 3đ
kiện; xuất (sqr(c)=sqr(b)+sqr(a)) then
 write(1) else write(0);
 End.
BỘ TEST CHƯƠNG TRÌNH:
TEST 1:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 48 55 73 1
TEST 2:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 200 91 500 0
TEST 3:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 216 2912 2920 1
Câu 2 (4 điểm): Tổng các số chia hết cho 3
 Var a: array[1..100] of integer;
 Khai báo i, tong: integer; 1đ
 n: byte;
Nhập số Begin
lượng phần Read(n);
 1đ
tử và từng For i:=1 to n do read(a[i]);
phần tử
 Tong:=0;
 For i:=1 to n do
 If (a[i] mod 2 0) and (a[i] mod 3 = 0) then
In các phần
 Begin
tử ra màn
 Tong:=tong+a[i]; 2đ
hình và tính
 Write(a[i],’ ’);
tổng
 End;
 Writeln; write(tong);
 End.
 DeThiTinHoc.net Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án) - DeThiTinHoc.net
Câu 4 (4 điểm): Tìm mật thư
 Var s,s1,s2:string;
 Khai báo 1đ
 i,k:integer;
 Begin
 Read(s);
 k:=0;
 for i:=1 to length(s) do
Tìm k, xóa
 if s[i]=#32 then k:=k+1;
hết dấu
 while pos(’ ’,s)0 do delete(s,pos(’ ’,s,1); 3đ
cách, in kết
 s1:=’’; s2:=’’;
quả
 for i:=k downto 1 do s1:=s1+s[i];
 for i:=length(s) downto k+1 do s2:=s2+s[i];
 write(s1+s2);
 end.
BỘ TEST CHƯƠNG TRÌNH:
TEST 1:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 gnork˽˽˽an˽˽a krongana
TEST 2:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 ˽˽coh˽man˽32022203˽˽ namhoc20222023
TEST 3:
 Dữ liệu nhập từ bàn phím Kết quả in ra màn hình
 ˽hih˽˽tedneyu˽hgs˽˽ dethihsghuyen
Câu 5 (3 điểm): Năm âm lịch
 Const
 Can: array[0..9] of
 string=(’Canh’,’Tan’,’Nham’,’Quy’,’Giap’,’At’,’Binh’’Dinh’,
 ’Mau’,’Ki’;
Khai báo Chi: array[0..11] of 1đ
 string=(’Than’,’Dau’,’Tuat’,’Hoi’,’Ti’,’Suu’,’Dan’,’Mao’,
 ’Thin’,’Ty’,’Ngo’,’Mui’);
 Var year:integer;
 i,j:byte;
 Begin
 Year:=1;
Vòng lặp
 While year>0 do
đến khi 2đ
 Begin
năm<=0
 Read(year);
 If year>0 then
 DeThiTinHoc.net Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án) - DeThiTinHoc.net
 PHÒNG GIÁO DỤC VÀ ĐÀO TẠO ĐỀ THI HỌC SINH GIỎI LỚP 9 VÒNG HUYỆN
 HUYỆN NĂM CĂN NĂM HỌC 2022-2023
 ĐỀ CHÍNHTHỨC Môn thi: Tin học
 Ngày thi: 03 – 03 – 2023
 Thời gian: 150 phút(Không kể thời gian giao đề)
 (Đề gồm 4 câu được in trên 03 trang. Học sinh làm bài trên máy tính bàn)
 Tổng quan bài thi
 Tên file
 Tên bài Input Output Điểm
 chương trình
 Bài 1 banchon.pas banchon.inp banchon.out 5
 Bài 2 xacdinhso.pas xacdinhso.inp xacdinhso.out 5
 Bài 3 tong.pas tong.inp tong.out 5
 Bài 4 doitien.pas doitien.inp doitien.out 5
 - Học sinh tạo thư mục trên máy tính đặt tên là số báo danh và tên của mình.
 Ví dụ: SBD là 005, tên Nguyễn Minh An thì tên thư mục:
 005Nguyễn Minh An
 - Xem phẩn tổng quan bài thi để làm bài đúng theo yêu cầu, các file chương trình (các
file.. .pas)được lưu vào thư mục của mình đã tạo.
Bài 1.Bán chồn (5,0 điểm)
 Gia đình Bác Tư có nuôi 2 con chồn, hiện nay mỗi con cận nặng từ 1 đến 5kg. Hôm
nay bác dự định bán đi 2 con chồn của mình với mức giá đã được quy định trên thị trường
như sau:
 - Nếu cân nặng mỗi con nhỏ hơn 2 kg thì giá mua là 500.000 đồng/1kg.
 - Nếu cận nặng mỗi con lớn hơn hoặc bằng 2 kg thì gía mua là 700.000 đồng/1kg.
 Yêu cầu: Hãy giúp Bác Tư tính số tiền có được từ việc bán 2 con chồn.
 - Dữ liệu vào từ file banchon.inp: ghi 2 số là cân nặng của 2 con chồn ( 2 số được ghi
trên 1 dòng, cách nhau bởi 1 khoảng trắng).
 - Dữ liệu ra trên file banchon.out: Ghi 1 số là số tiền có được từ việc bán 2 con chồn.
 banchon.inp banchon.out
 DeThiTinHoc.net Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án) - DeThiTinHoc.net
 Yêu cầu: Hãy viết chương trình tìm giá trị K lớn nhất (để các em học sinh nhận được
nhiều tiền nhất)
 - Dữ liệu vào từ file doitien.inp: Dòng đầu tiên ghi số N, dòng tiếp theo ghi một dãy
số là số các số điểm của từng học sinh (do Ban tổ chức cấp), các số cách nhau một dấu cách.
 - Dữ liệu ra trên file doitien.out: Ghi 1 số K là số tiền lớn nhất cần tìm.
 Ràng buộc:
 + 50 test ứng với 50% số điểm khi N≤103
 + 50 test ứng với 50% số điểm khi 103 ≤ N≤106
 Ví dụ:
 Tien.inp Tien.out
 5 5
 10 20 50 25 35
 4 1
 50 25 10 7
 -Hết-
 DeThiTinHoc.net Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án) - DeThiTinHoc.net
 assign(input,'banchon.inp');
 assign(output,'banchon.out');
 rewrite(output);
 reset(input);
 readln(fi,kg1,kg2); 1,0 điểm
 if kg1<2 then tien1:=500000*kg1
 else tien1:=kg1*700000;
 if kg2<2 then tien2:=500000*kg2
 else tien2:=kg2*700000; 1,5 điểm
 tien:=tien1+tien2;
 write(fo,tien);
 write(tien);
 close(fi); close(fo);
 readln
end. 1,5 điểm
Bài 2
program bai2_xacdinhso;
uses crt;
var n,m,tam,j,i: Integer;
A,B:array[1..100] of integer;
f1, f2:text; 0,75 điểm
Begin
clrscr;
assign(f1,'xacdinhso.inp'); reset(f1);
assign(f2,''xacdinhso.out'); rewrite(f2);
read(f1,n,m); 1,0 điểm
for i:=1 to N do
Begin
read(f1, A[i]); B[i]:=A[i];
end; 1,0 điểm
for i:=1 to n-1 do
 DeThiTinHoc.net Đề thi Học sinh giỏi Tin học Lớp 9 Cấp Huyện 2022-2023 (Có đáp án) - DeThiTinHoc.net
Bài 4
program bai4_doitien;
uses crt;
var a:array[1..1000000000] of byte;
 i,n: longint;
 ucnn: word;
function uc(x:word;y:word):byte; 1,0 điểm
begin
 while xy do
 begin
 if x>y then x:=x-y
 else y:=y-x;
 end;
 exit(x);
end; 1,0 điểm
//========== chuong trinh chinh=============
begin
 write(' nhap n: '); readln(n);
 for i:=1 to n do
 begin
 write('a[',i,']=');
 readln(a[i]);
 end; 1,5 điểm
 ucnn:=uc(a[1],a[2]);
 for i:=3 to n do
 ucnn:=uc(ucnn,a[i]);
 write(' uoc chung nho nhat la ',ucnn);
 readln
end. 1,5 điểm
 DeThiTinHoc.net