Đề thi HSG cấp huyện môn Tin học năm học 2010-2011

PHÒNG GD&ĐT HOÀI ÂN KỲ THI HSG MÔN TIN HỌC LỚP 9
NĂM HỌC 2010-2011
Thời gian: 150 phút (không kể thời gian giao đề)

YÊU CẦU CHUNG
Mỗi thí sinh lập một thư mục trên máy như sau: D:THIHSG_L9(số báo danh của thí sinh) để lưu các file bài làm. (Bài 1 lưu thành file Bai1.pas, Bài 2 lưu Bai2.pas, Bài 3 lưu Bai3.pas).
Em hãy lập trình bằng ngôn ngữ Pascal để giải các bài toán sau:
Bài 1: (6,0 điểm)
Viết chương trình nhập từ bàn phím vào số nguyên dương n
, số nguyên dương k và dãy A gồm n số nguyên dương (a1, a2,...,an) và thực hiện các công việc sau: a) Tính tổng các số chẵn có trong dãy.
b) Tính tổng các phần tử có giá trị bằng k.
c) In ra màn hình dãy số A, tổng các số chẵn trong dãy, tổng các số trong dãy có giá trị bằng k.
Bài 2 :(6,0 điểm)
Một số k được gọi là số chính phương khi và chỉ khi tồn tại một số nguyên x sao cho x2 = k.
Viết chương trình thực hiện các yêu cầu sau :
Nhập vào 2 số nguyên dương n, m lớn hơn hoặc bằng 2. Chương trình có kiểm tra giá trị nhập vào.
Nhập vào một mảng hai chiều A các số nguyên dương gồm n hàng và m cột.
Tìm tất cả các số chính phương trong mảng ở câu b và lưu vào một mảng một chiều.
In mảng một chiều chứa các số chính phương của mảng hai chiều A vừa tìm được ở câu c. ra màn hình.
Bài 3:(8,0 điểm)
Cho hình chữ nhật ABCD có chiều dài AB là a (cm), chiều rộng AD là b (cm) với a, b là các số nguyên dương không vượt quá 10000. Một điểm M trên đoạn BC, một điểm N trên đoạn CD sao cho độ dài (tính bằng cm) các đoạn BM, CN bằng nhau và là số nguyên không âm.








Yêu cầu:
1. Biết độ dài BM = x, tính diện tích hình chữ nhật ABCD và diện tích tam giác MCN.
2.Tìm giá trị lớn nhất và giá trị nhỏ nhất của diện tích tam giác AMN khi M, N thay đổi.
Dữ liệu vào: Dữ liệu của bài toán cho trong tệp tin DTICH.INP (tệp tin DTICH.INP đã có sẵn trên thư mục chứa Turbo Pascan, thí sinh không cần tạo) gồm ba số a, b, x (x
b
a, x là độ dài BM trong yêu cầu 1 và là số nguyên dương) được ghi trên cùng một dòng theo đúng thứ tự trên, hai số liên tiếp cách nhau một khoảng trắng.
Dữ liệu ra: Kết quả ghi ra file DTICH.OUT trên 5 dòng:
- Dòng đầu là ba số a, b và x.
Dòng thứ hai là diện tích hình chữ nhật ABCD.
Dòng thứ ba là diện tích tam giác MCN
Dòng thứ tư là giá trị lớn nhất của diện tích tam giác AMN
Dòng thứ năm là giá trị nhỏ nhất của diện tích tam giác AMN
(Các giá trị diện tích được ghi dưới dạng thập phân với 1 chữ số sau dấu phẩy).
Ví dụ:
DTICH.INP
Kết quả trên màn hình (hoặc file DTICH.OUT)

10 6 2
10 6 2
60.0
4.0
30.0
17.5


Lưu ý: Nếu không nhập được dữ liệu vào từ file, thí sinh có thể nhập dữ liệu vào từ bàn phím. Nếu không ghi được dữ liệu ra vào file DTICH.OUT thí sinh có thể xuất kết quả ra màn hình (sẽ bị trừ điểm).





























Đáp án
Chương trình mẫu (bai1.pas)
uses crt;
var n,k,tongchan,tongk,i:integer;
a:array[1..20] of integer;
Begin
clrscr;
Repeat
Write(`Nhap n=`);Readln(n);
Write(`Nhap k=`);Readln(k);
Until (n>0) and (k>0);
tongchan:=0;
tongk:=0;
for i:=1 to n do
Begin
write(`a`,i,`=`);readln(a[i]);
if (a[i] mod 2 = 0) then tongchan:=tongchan+a[i