Đề thi chọn học sinh giỏi môn Tin học Lớp 9 - Năm học 2014-2015 - Phòng Giáo dục và đào tạo Phù Ninh

Nội dung text: Đề thi chọn học sinh giỏi môn Tin học Lớp 9 - Năm học 2014-2015 - Phòng Giáo dục và đào tạo Phù Ninh

1. PHềNG GIÁO DỤC VÀ ĐÀO TẠO PHÙ NINH ĐỀ THI CHỌN HỌC SINH GIỎI LỚP 9 NĂM HỌC 2014-2015 Mụn: Tin học Thời gian: 120 phỳt (khụng kể thời gian giao đề) Sử dụng ngôn ngữ lập trình Turbo Pascal để lập trình giải các bài toán sau: Cõu 1 (6.0đ): Chữ số: CHUSO.PAS Viết chương trỡnh nhập vào một số tự nhiờn n (n< 1000) và xỏc định: - n cú bao nhiờu chữ số. - Tổng cỏc chữ số của n. - Chữ số đầu tiờn bờn trỏi của n. Vớ dụ: Nhap vao so nguyen: 254 254 la so co 3 chu so. 254 co tong cỏc chu so la 11 254 co chu so dau tien ben trai la 2 Cõu 2 (6.0đ): Xúa xõu: XOAXAU.PAS Viết chương trỡnh nhập vào một xõu ký tự St1 (nhỏ hơn 30 ký tự), hóy loại bỏ khỏi xõu nhúm cỏc ký tự ‘abc’ và xuất ra xõu St2 sau khi đó loại bỏ cỏc ký tự trờn. Vớ dụ: Nhập vào xõu là: acabcababcac Kết quả được xõu St2 là: acabac Cõu 3: (8,0 điểm) TANSUAT.PAS Cho một dóy số nguyờn A gồm n phần tử A1, A2, A3, , An (1 ≤ n ≤ 20000) (0 ≤ Ai ≤ 32000, 1 ≤ i ≤ n). Lập chương trỡnh xỏc định số lần xuất hiện của mỗi số trong dóy A. Dữ liệu vào: Cho trong file văn bản TANSUAT.INP cú cấu trỳc như sau: + Dũng 1: Ghi số nguyờn dương n (n<10). + Dũng 2: Ghi n số nguyờn, là giỏ trị của cỏc phần tử thuộc dóy A. Cỏc số được ghi cỏch nhau ớt nhất một dấu cỏch. Dữ liệu ra: Ghi ra file văn bản TANSUAT.OUT gồm m dũng (0 ≤ m ≤ n). Mỗi dũng ghi 02 số nguyờn dương u, v. Trong đú u là giỏ trị của phần tử xuất hiện trong dóy A; v là số lần xuất hiện của u trong dóy A. Vớ dụ: TANSUAT.INP TANSUAT.OUT 10 1 2 1 6 5 4 1 2 3 6 5 4 2 1 3 1 4 2 5 2 6 2 Hết Họ và tờn thớ sinh: Số bỏo danh:
2. PHềNG GIÁO DỤC VÀ ĐÀO TẠO PHÙ NINH HƯỚNG DẪN CHẤM THI HỌC SINH GIỎI LỚP 9 NĂM HỌC 2014-2015 Mụn: Tin học I- Phương pháp: - Giám khảo tạo bộ dữ liệu vào, tính toán kết quả. Thực hiện chương trình của học sinh và so sánh kết quả. - Giám khảo có thể sử dụng chương trình gợi ý dưới đây để tính toán kết quả của dữ liệu vào. - Chương trình học sinh đúng một bộ test, giám khảo cho 0,5 điểm. Như vậy, nếu một bài có 3 điểm thì giám khảo phải tạo 6 bộ test. - Riờng cõu 3 giỏm khảo tạo bộ dữ liệu vào với file TANSUAT.INP cú đủ dữ liệu để kiểm tra. II- Chương trình gợi ý: Cõu 1 (3.0đ): Chữ số: Program Chuso; var n,a,b,c,t,s,x,k: integer; BEGIN write('Nhap so tu nhien n nho hon 1000: n = '); Repeat readln(n); if (n =1000) then writeln(' 0 =0) and (n =0) and (n =10) and (n <=99) then begin x:= b; k:=2 end else begin x:= a; k:=3 end; writeln(n,' co ',k,' chu so.' ); writeln(n,' co tong cac chu so la ',s); writeln(n,' co chu so dau tien ben trai la ',x); readln; end. Cõu 2 (3.0đ): Xúa xõu: Program xoaxau; VAR st: string[30]; st1: string; l,p: byte;
3. BEGIN writeln('Chuong trinh loai bo ''abc'' :'); write('Nhap mot xau 30 ki tu St : ');readln(st); st1:=st; repeat l:=length(st1); p:=pos('abc',st1); if (p 0 then writeln(f,i,' ', a[i]:4); close(f); end; BEGIN Xuly; END.