Website HOC247 cung cấp một môi trường học trực tuyến sinh động, nhiều tiện ích thông minh, nội dung bài giảng được biên soạn công phu và giảng dạy bởi những giáo viên nh[r]
Trang 1SỞ GD VÀ ĐT VĨNH PHÚC
TRƯỜNG THPT LIỄN SƠN
KỲ THI CHỌN HSG CẤP TRƯỜNG LỚP 11
Năm học: 2018-2019
MÔN: TIN HỌC
Thời gian 180 phút (Không kể thời gian giao đề)
Tổng quan bài thi
TT Tên bài Tên file CT Tên file DL vào Tên file DL ra Điểm Thời gian
1 Đếm đoạn count.pas count.inp count.out 7 1s
3 Chia quà tết gift.pas gift.inp gift.out 6 1s
Bài 1: Đếm đoạn
Tên file: count.pas
Dữ liệu vào: count.inp
Dữ liệu ra: count.out
Cho mảng có số nguyên Một đoạn con của là một dãy các phần tử liên tiếp trong Hãy đếm số đoạn con của có giá trị lớn nhất lớn hơn hoặc bằng
Dữ liệu:
- Dòng 1: Ghi 2 số nguyên , các số cách nhau 1 khoảng trống
- Dòng 2: Ghi số nguyên của dãy , các số cách nhau 1 khoảng trống
Kết quả:
Gồm 1 dòng duy nhất ghi kết quả
Ví dụ:
count.inp count.out
5 1
1 1 1 1 1
15
Giới hạn:
- Có số test ứng với số điểm có
- Có số test khác ứng với số điểm có
- Có 40% số test còn lại ứng với số điểm có
- Trong tất cả các test có
Bài 2 Số lớn
Tên file: nmax.pas
Dữ liệu vào: nmax.inp
Dữ liệu ra: nmax.out
Peter và Bin chơi trò chơi tìm số lớn, Peter cho Bin biết trước một xâu kí tự, trong đó có ít nhất 5 chữ số Peter yêu cầu Bin tìm số lớn nhất từ xâu đã cho bằng cách hãy loại bỏ một số kí tự ra khỏi xâu sao cho 5
kí tự cuối cùng còn lại theo đúng thứ tự đó tạo thành số lớn nhất
Dữ liệu: Dòng 1 gồm một xâu cho trước
Kết quả: Một dòng duy nhất chứa số nguyên là số lớn nhất mà Bin tìm được sau khi loại bỏ các kí tự
count.inp count.out
4 4
1 5 2 5
8
Trang 2Ví dụ:
13a7b48cb7d9e68f7 89687
Bài 3: Chia quà tết
Tên file: gift.pas
Dữ liệu vào: gift.inp
Dữ liệu ra: gift.out
Trường THPT A chia quà tết cho học sinh, có X chiếc áo và Y hộp bánh để chia quà cho học sinh diện chính sách cuối năm 2018 Nhà trường chia quà cho học sinh thoả mãn điều kiện: nếu chia cho n học sinh
diện chính sách thì các học sinh phải nhận được số lượng chiếc áo như nhau, số lượng hộp bánh như
nhau, đồng thời phải chia hết tất cả X chiếc áo và Y hộp bánh Em hãy giúp nhà trường liệt kê tất cả các
phương án chia quà thoả mãn điều kiện nêu trên
Dữ liệu: Dòng 1: hai số nguyên X, Y (1<= X, Y <= 109)
Kết quả: Dòng 1 m (m là số phương án chia quà): trên mỗi dòng ghi ba số nguyên n, a, b (mỗi số cách
nhau một dấu cách) là một phương án chia quà có n học sinh được chia quà, mỗi học sinh nhận a chiếc áo
và b hộp bánh Các phương án được liệt kê ở các dòng liên tiếp theo thứ tự n tăng dần
Ví dụ:
gift.inp gift.out
3 3 4
2 3 9
3 2 6
6 1 3
ĐÁP ÁN
Bài 1: Đếm đoạn
uses math;
var q,d,z,n,i,s,m,k,j:longint;
f, g:text;
a, b:array[0 1000000]of qword;
begin
assign(f,'nmax.inp');reset(f);
assign(g,'nmax.out');rewrite(g);
readln(f,n,m);
// s:=0;
// d:=0;
for i:=1 to n do
read(f,a[i]);
Trang 3q:=0;
for i:=1 to n do
begin
if a[i]>=m then
begin
q:=i;
b[i]:=b[i-1]+q;
end
else
b[i]:=b[i-1]+q;
end;
writeln(g,b[n]);
close(f);
close(g);
End
Bài 2: Tìm số lớn
var f,g:text;
s:ansistring;
Procedure Nhap;
Begin
assign(f,'nmax.inp'); reset(f);
assign(g,'nmax.out'); rewrite(g);
read(f,S);
close(f);
end;
Procedure xuly;
var i,j,k:byte;
begin
i:=1;
repeat
if s[i] in ['0' '9'] then inc(i) else delete(s,i,1);
until i>length(s);
for i:=1 to 5 do
begin
k:=i;
for j:=i to length(s)+i-5 do
if s[k]<s[j] then k:=j;
if k>i then delete(s,i,k-i);
end;
writeln(g,copy(s,1,5));
close(g);
Trang 4end;
Begin
Nhap; xuly; readln;
End
Bài 3: Chia quà tết
//gift.pas
var i,x,y:longint;
f,g: text;
function UCLN(x,y:longint):longint;
var sd:longint;
begin
while y<>0 do
begin
sd:= x mod y;
x:=y;
y:=sd;
end;
UCLN:=x;
end;
begin
assign(f,'gift.inp'); reset(f);
assign(g,'gift.out'); rewrite(g);
read(f,x,y);
for i:=1 to UCLN(x,y) do
begin
if (x mod i=0) and (y mod i =0) then
writeln(g,i,' ',x div i,' ',y div i);
end;
close(f);
close(g);
readln
End
Trang 5Website HOC247 cung cấp một môi trường học trực tuyến sinh động, nhiều tiện ích thông minh, nội dung bài giảng được biên soạn công phu và giảng dạy bởi những giáo viên nhiều năm kinh nghiệm, giỏi về kiến thức chuyên môn lẫn kỹ năng sư phạm đến từ các trường Đại học và các trường chuyên
danh tiếng
I Luyện Thi Online
- Luyên thi ĐH, THPT QG: Đội ngũ GV Giỏi, Kinh nghiệm từ các Trường ĐH và THPT danh tiếng xây dựng các khóa luyện thi THPTQG các môn: Toán, Ngữ Văn, Tiếng Anh, Vật Lý, Hóa Học và Sinh
Học
- Luyện thi vào lớp 10 chuyên Toán : Ôn thi HSG lớp 9 và luyện thi vào lớp 10 chuyên Toán các
trường PTNK, Chuyên HCM (LHP-TĐN-NTH-GĐ), Chuyên Phan Bội Châu Nghệ An và các trường Chuyên khác cùng TS.Trần Nam Dũng, TS Pham Sỹ Nam, TS Trịnh Thanh Đèo và Thầy Nguyễn Đức
Tấn
II Khoá Học Nâng Cao và HSG
- Toán Nâng Cao THCS: Cung cấp chương trình Toán Nâng Cao, Toán Chuyên dành cho các em HS THCS lớp 6, 7, 8, 9 yêu thích môn Toán phát triển tư duy, nâng cao thành tích học tập ở trường và đạt điểm tốt ở các kỳ thi HSG
- Bồi dưỡng HSG Toán: Bồi dưỡng 5 phân môn Đại Số, Số Học, Giải Tích, Hình Học và Tổ Hợp dành
cho học sinh các khối lớp 10, 11, 12 Đội ngũ Giảng Viên giàu kinh nghiệm: TS Lê Bá Khánh Trình, TS
Trần Nam Dũng, TS Pham Sỹ Nam, TS Lưu Bá Thắng, Thầy Lê Phúc Lữ, Thầy Võ Quốc Bá Cẩn cùng
đôi HLV đạt thành tích cao HSG Quốc Gia
- HOC247 NET: Website hoc miễn phí các bài học theo chương trình SGK từ lớp 1 đến lớp 12 tất cả
các môn học với nội dung bài giảng chi tiết, sửa bài tập SGK, luyện tập trắc nghiệm mễn phí, kho tư liệu tham khảo phong phú và cộng đồng hỏi đáp sôi động nhất
- HOC247 TV: Kênh Youtube cung cấp các Video bài giảng, chuyên đề, ôn tập, sửa bài tập, sửa đề thi
miễn phí từ lớp 1 đến lớp 12 tất cả các môn Toán- Lý - Hoá, Sinh- Sử - Địa, Ngữ Văn, Tin Học và Tiếng Anh
Vững vàng nền tảng, Khai sáng tương lai
Học mọi lúc, mọi nơi, mọi thiết bi – Tiết kiệm 90%
Học Toán Online cùng Chuyên Gia
HOC247 NET cộng đồng học tập miễn phí HOC247 TV kênh Video bài giảng miễn phí