Kỳ thi khảo sát học sinh năng khiếu lớp 8 - lần 4 cấp trường năm học 2015 - 2016 đề thi môn: Tin học thời gian làm bài: 150 phút (không kể thời gian giao đề)

TRƯỜNG THCS TÂN PHÚ
KỲ THI KHẢO SÁT HSNK LỚP 8 _LẦN 4
CẤP TRƯỜNG NĂM HỌC 2015-2016
Đề thi môn: TIN HỌC
Thời gian làm bài: 150 phút (không kể thời gian giao đề)
	Tạo Folder mang tên là HSNK và lưu theo đường dẫn: D:\Thi HSG (SBD). Các file của bài thi được đặt tên lần lượt là CAU1.PAS; CAU1.DOC, CAU2.PAS; CAU2.DOC, CAU3.PAS. CAU3.DOC, và lưu vào Folder vừa tạo (các file có đuôi .DOC là file viết lại chương trình của bài thay cho việc viết trên giấy thi). 
	Câu 1 (7,0 điểm). Viết chương trình tính chu vi, diện tích hình vuông có cạnh a được nhập từ bàn phím.
	Tên tập tin: D\Thi HSG\Cau1.pas
	 D\Thi HSG\Cau1.doc
	Câu 2 (7,0 điểm). Viết chương trình giải phương trình bậc nhất ax+b= 0. Với các hệ số a, bđược nhập từ bàn phím.
	Tên tập tin: D\Thi HSG\Cau2.pas
	 D\Thi HSG\Cau2.doc
Câu 3 (6, 0 điểm) 
	Viết chương trình tính diện tích, chu vi hình tròn có bán kính r được nhập từ bàn phím.
	Tên tập tin: D\Thi HSG\Cau3.pas
	 D\Thi HSG\Cau3.doc
TRƯỜNG THCS TÂN PHÚ
HƯỚNG DẪN CHẤM 
 KỲ THI KHẢO SÁT HSNK LỚP 8 _LẦN 4
CẤP TRƯỜNG NĂM HỌC 2015-2016
Đề thi môn: TIN HỌC
	Câu 1 (7,0 điểm). Viết chương trình tính chu vi, diện tích hình vuông có cạnh a được nhập từ bàn phím.
Test
Nhập số a
Kết quả in ra màn hình
Điểm
Diện tích
Chu vi
1
7
49
28
1
2
179
32.041
716
1
3
253
64.009
1.012
1
4
300
90.000
1.200
1
Mã chương trình (3,0 điểm).
Progam HINH_VUONG;
Uses crt;
Var canh:real;
Begin
	Clrscr;
	Write(‘Nhap do dai canh hinh vuong: ‘); readln(canh);
	Writeln(‘Chu vi hinh vuong la: ‘,4*canh:10:2);
	Writeln(‘Dien tich hinh vuong la: ’,canh*canh:10:2)
	Readln
End.
	Câu 2 (7,0 điểm). Viết chương trình giải phương trình bậc ax+b=0
- Mã chương trình (4,0 điểm)
Program Phuong_trinh_2;
uses crt;
var a,b:real;
begin
 clrscr;
 Writeln(' CHUONG TRINH GIAI PT ax + b = 0');
 Write('Nhap he so a = ');readln(a);
 Write('Nhap he so b = ');readln(b);
 if (a0) then writeln('phuong trinh',a:10:2,'x + ',b:10:2,'= 0',' co nghiem x =;',-b/a:10:2);
 if (a=0) and (b=0) then writeln('Phuong trinh co vo so nghiem');
 if (a=0) and (b0) then writeln('Phuong trinh vo nghiem');
 readln
end.
Test
Nhập số a,b
Kết quả hiện ra màn hình
Điểm
1
a=0,b=2
Phương trình vô nghiệm
1
2
a=0,b=0
Phương trình vô số nghiệm
1
3
a=2,b=4
X=-2
1
Câu 3 (6, 0 điểm) 
Viết chương trình tính diện tích, chu vi hình tròn có bán kính r được nhập từ bàn phím.
Test
Nhập số n
Kết quả in ra màn hình
Điểm
Diện tích
Chu vi
1
13
530,93
81,68
1
2
25
1963,50
157,08
1
3
43
5808,80
270,18
1
4
75
17671,46
471,24
1
Mã chương trình (2,0 điểm)
Program HINH_TRON;
Uses crt;
Var r: real;
Begin
	Clrscr;
	Write(‘Nhap ban kinh hinh tron: ‘); readln(r);
	Writeln(‘Chu vi duong tron la: ‘,2*pi*r: 10:2);
	Writeln( ‘Dien tich hinh tron la : ‘,pi*r*r :10 :2) ;
	Readln
End.
-------------------------------- Hết ----------------------------------