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.pa[r]
(1)TRƯỜNG THCS TÂN PHÚ KỲ THI KHẢO SÁT HSNK LỚP _LẦN 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 bài thi đặt tên 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 bài thay cho việc viết trên giấy thi) Câu (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 nhập từ bàn phím Tên tập tin: D\Thi HSG<SBD>\Cau1.pas D\Thi HSG<SBD>\Cau1.doc Câu (7,0 điểm) Viết chương trình giải phương trình bậc ax+b= Với các hệ số a, bđược nhập từ bàn phím Tên tập tin: D\Thi HSG<SBD>\Cau2.pas D\Thi HSG<SBD>\Cau2.doc Câu (6, đ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 nhập từ bàn phím Tên tập tin: D\Thi HSG<SBD>\Cau3.pas D\Thi HSG<SBD>\Cau3.doc (2) TRƯỜNG THCS TÂN PHÚ HƯỚNG DẪN CHẤM KỲ THI KHẢO SÁT HSNK LỚP _LẦN CẤP TRƯỜNG NĂM HỌC 2015-2016 Đề thi môn: TIN HỌC Câu (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 nhập từ bàn phím Test Nhập số a 179 253 300 Kết in màn hình Diện tích Chu vi 49 28 32.041 716 64.009 1.012 90.000 1.200 Điểm 1 1 Mã chương trình (3,0 điểm) Progam HINH_VUONG; Uses crt; Var canh:real; Begin Clrscr; Write(‘Nhap 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 (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 (a<>0) 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 (b<>0) then writeln('Phuong trinh vo nghiem'); (3) readln end Test Nhập số a,b a=0,b=2 a=0,b=0 a=2,b=4 Kết màn hình Điểm Phương trình vô nghiệm Phương trình vô số nghiệm X=-2 1 Câu (6, đ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 nhập từ bàn phím Test Nhập số n 13 25 43 75 Kết in màn hình Diện tích Chu vi 530,93 81,68 1963,50 157,08 5808,80 270,18 17671,46 471,24 Điểm 1 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 (4)