Đang tải... (xem toàn văn)
Đề thi học sinh lớp 12 cấp tỉnh năm học 20202021 Đề thi học sinh lớp 12 cấp tỉnh năm học 20202021Đề thi học sinh lớp 12 cấp tỉnh năm học 20202021 Đề thi học sinh lớp 12 cấp tỉnh năm học 20202021 Đề thi học sinh lớp 12 cấp tỉnh năm học 20202021 Đề thi học sinh lớp 12 cấp tỉnh năm học 20202021 Đề thi học sinh lớp 12 cấp tỉnh năm học 20202021
MÃ KÍ HIỆU (PHẦN NÀY DO SỞ GDĐT GHI) ………………………… ĐỀ THI CHỌN HSG LỚP 12 THPT CẤP TỈNH NĂM 2023 MÔN: TIN HỌC Thời gian làm bài: 120 phút (không kể thời gian phát đề) Đề thi gồm 03 câu, 03 trang Tổng quan đề thi Bài Tên Xóa kí tự Dãy Đơi bạn File chương trình XOAKITU.* DAYCON.* FRIEND.* File liệu vào XOAKITU.INP DAYCON.INP FRIEND.INP File kết XOAKITU.OUT DAYCON.OUT FRIEND.OUT Thời gian 1s / test 1s / test 1s / test Dấu * thay PAS, PY CPP ngơn ngữ lập trình tương ứng Pascal, Python C++ Hãy lập trình giải tốn sau: BÀI (6 điểm) Xoá kí tự: Trong pascal xâu dãy kí tự nằm mã ASCII (bao gồm chữ cái, chữ số, kí tự đặc biệt) Yêu cầu: Viết chương trình xóa ký tự liên tiếp giống xâu cho trước giữ lại kí tự Dữ liệu: Cho file XOAKITU.INP gồm dịng chứa xâu Kết quả: Ghi file XOAKITU.OUT chứa xâu kết sau xóa ký tự trùng Ví dụ: XOAKITU.INP XOAKITU.OUT Niiiiiiih BBBBBinhhhh Ninh Binh (Hạn chế: Độ dài xâu không 255 kí tự) Bài (7 điểm) Dãy con: Cho dãy gồm N số nguyên a1, a2, , an Yêu cầu: Tìm dãy gồm phần tử liên tiếp dãy cho với tổng phần tử dãy lớn Dữ liệu: Vào từ file văn DAYCON.INP - Dòng đầu tiền chứa số nguyên dương n (n < 106) - Dòng thứ chứa giá trị a[i] (|ai| < 1000) Kết quả: Ghi file văn DAYCON.OUT - Dòng ghi vị trí phần tử dãy tìm - Dịng thứ ghi vị trí phần tử cuối dãy tìm - Dòng thứ ghi tổng phần tử dãy tìm Ví dụ: DAYCON.INP 12 -14 23 -6 22 -34 13 Bài (7 điểm) Đôi bạn: DAYCON.OUT 40 Trước Tuấn Mai hai bạn lớp hai bạn học khác trường Cứ sáng, hai từ nhà tới trường theo đường thời gian (có thể có nhiều đường thời gian nhất) Nhưng hơm nay, hai bạn muốn gặp để bàn việc họp lớp cũ nhân ngày 20-11 Cho biết sơ đồ giao thông thành phố gồm N nút giao thông đánh số từ đến N M tuyến đường phố (mỗi đường phố nối nút giao thơng) Vị trí nhà Mai Tuấn trường hai bạn nằm nút giao thông Cần xác định xem Mai Tuấn có cách thoả mãn yêu cầu nêu trên, đồng thời họ lại gặp nút giao thơng đường tới trường hay khơng ? (Ta nói Tuấn Mai gặp nút giao thơng họ đến nút giao thơng thời điểm) Nếu có nhiều phương án phương án để Mai Tuấn gặp sớm Dữ liệu vào đặt tệp FRIEND.INP: Dòng chứa số nguyên dương N, M (1 N 100); Dòng chứa số nguyên dương Ha, Sa, Hb, Sb số hiệu nút giao thông tương ứng với: Nhà Tuấn, trường Tuấn, nhà Mai, trường Mai Dòng thứ i số M dòng chứa số nguyên dương A, B, T Trong A & B hai đầu tuyến đường phố i Cịn T thời gian (tính giây 1000) cần thiết để Tuấn (hoặc Mai) từ A đến B từ B đến A Giả thiết sơ đồ giao thông thành phố đảm bảo để từ nút giao thơng đến tất nút cịn lại Kết : Ghi tệp văn FRIEND.OUT Dòng 1: Ghi từ YES hay NO tuỳ theo có phương án giúp cho hai bạn gặp hay khơng Trong trường hợp có phương án: Dịng 2: Ghi thời gian để Tuấn tới trường Dịng 3: Ghi nút giao thơng theo thứ tự Tuấn qua Dịng 4: Ghi thời gian để Mai tới trường Dòng 5: Ghi nút giao thông theo thứ tự Mai qua Dịng 6: Ghi số hiệu nút giao thơng mà hai bạn gặp Dòng 7: Thời gian sớm tính giây kể từ sáng mà hai bạn gặp Các số dịng Input/Output file ghi cách dấu cách Ví dụ : Với sơ đồ giao thơng sau: (N=6,M=7, Ha=1, Sa=6, Hb=2, Sb=5) FRIEND.INP 67 1625 10 10 235 345 15 20 15 FRIEND.OUT YES 25 146 30 2345 10 10 10 15 5 2 20 15 HẾT MÃ KÍ HIỆU (PHẦN NÀY DO SỞ GDĐT GHI) ……………………… HƯỚNG DẪN CHẤM ĐỀ THI CHỌN HSG LỚP 12 THPT Năm 2023 Môn: Tin học (Hướng dẫn chấm gồm 04 trang) Phần mở rộng file chương trình PAS, CPP PY tuỳ theo ngơn ngữ lập trình sử dụng Pascal, C++ Python Cách chấm bài: Sao chép làm thí sinh (*.PAS *.CPP *.PY) từ đĩa thi vào ổ cứng Sao chép test *.IN? vào thư mục với làm đổi tên thành *.INP Chạy chương trình thí sinh Kiểm tra file *.OUT chương trình sinh ra, có, mở file đó, so sánh với đáp án cho điểm Nếu chương trình thí sinh khơng sinh file *.OUT khơng cho điểm - Mỗi test cho điểm (chạy tối đa test) BÀI ( điểm ) XOÁ KÍ TỰ: program xoakitu; uses crt; var s : string; i : byte; ch : char; f : Text; begin clrscr; Assign(f,'xoakitu.INP'); Reset(f); Readln(f,s); Close(f); Assign(f,'xoakitu.OUT'); Rewrite(f); ch := s[1]; Write(f,ch); for i:=2 to Length(s) if s[i] ch then begin ch := s[i]; Write(f,ch); end; Close(f); readln; end Bài (7 điểm) Dãy con: Program BAI2; const inp = 'DAYCON.inp'; out = 'DAYCON.out'; var n, dau, cuoi, d:longint; max, T:longint; f, g:text; Procedure input; begin assign(f,inp); reset(f); assign(g,out); rewrite(g); Readln(f,n); End; Procedure solve; var i,j:longint; begin dau:=1; cuoi:=1; d:=1; max:=-maxlongint; T:=0; for i:=1 to n begin read(f,j); T:=T + j ; If T > max then begin max:=T; dau:=d; cuoi:=i; end; If Ta[i,k]+a[k,j] then begin a[i,j]:=a[i,k]+a[k,j]; pre[i,j]:=k; end; End; Procedure xuly; var i,j,k:integer; Begin fillchar(pre,sizeof(pre),0); floyd; min:=maxc; cs:=0; for i:=1 to n if (a[ha,i]=a[hb,i]) then if (a[ha,i]