UBND HUYỆN BÌNH XUYÊN PHÒNG GIÁO DỤC ĐÀO TẠO KỲ THI CHỌN HỌC SINH GIỎI LỚP 8 NĂM HỌC 2017 2018 MÔN THI TIN HỌC (Thời gian 150 phút không kể thời gian giao đề) Tổng quan đề thi (Đề thi gồm 02 trang) ĐỀ THI THỬ MÔN TIN HỌC 8 CHỦ ĐỀ VỀ PASCAL 8
UBND HUYỆN BÌNH XUN PHỊNG GIÁO DỤC-ĐÀO TẠO KỲ THI CHỌN HỌC SINH GIỎI LỚP NĂM HỌC 2017-2018 MÔN THI: TIN HỌC (Thời gian: 150 phút không kể thời gian giao đề) Tổng quan đề thi: (Đề thi gồm 02 trang) Tên File Bài Tên Chương trình Một chữ số Dãy có giá trị lớn Đường tốt Tên File Dữ liệu vào Tên File Dữ liệu ONEDIGIT.PAS ONEDIGIT.INP ONEDIGIT.OUT MAXS.PAS MAXS.INP MAXS.OUT BESTWAY.PAS BESTWAY.INP BESTWAY.OUT Điểm Sử dụng ngơn ngữ lập trình Turbo Pascal Free Pascal viết chương trình giải tốn sau: Bài Một chữ số Hãy cộng tất chữ số số nguyên dương N cho trước Nếu kết số có chữ số kết thúc, ngược lại tiếp tục cộng chữ số tổng nhận kết số có chữ số Ví dụ: Với N = 1234567 → Tổng chữ số 1+2+3+4+5+6+7=28 → Quá tình tiếp tục 2+8=10 → Quá trình tiếp tục 1+0=1 Dừng Yêu cầu: Dữ liệu vào tệp ONEDIGIT.INP gồm số N Dữ liệu tệp ONEDIGIT.OUT gồm số kết tìm Ví dụ: ONEDIGIT.INP ONEDIGIT.OUT 1234567 12345678 Bài 2: Dãy có giá trị lớn Cho xâu S có chiều dài N (1≤N≤100) gồm chữ số từ đến số nguyên dương k (k≤N) Hãy viết chương trình xóa bớt ký tự xâu S để lại xâu gồm k chữ số biểu thị số lớn có k chữ số thu theo cách này? Yêu cầu: Dữ liệu vào tệp MAXS.INP có cấu trúc gồm hai dịng: - Dòng thứ chứa xâu S; - Dòng thứ hai chứa số tự nhiên k Dữ liệu tệp MAXS.OUT xâu có chiều dài k tìm Ví dụ: MAXS.INP MAXS.OUT 135782468 868 Bài 3: Đường tốt Sân chơi mặt phẳng chia thành N hàng đánh số từ đến N (1