Đề thi HSG Tin học Đề thi HSG Tin học Trường THCS Tôn Thất Thuyết ĐỀ LÍ THUYẾT Câu 1 Trong các thuyết bị nào sau đây thiết bị nào để lưu trử thông tin A Bàn phím B CPU C Chuột D RAM Câu 2 Để thực hiện[.]
Đề thi HSG Tin học Trường THCS Tôn Thất Thuyết ĐỀ LÍ THUYẾT: Câu 1: Trong thuyết bị sau thiết bị để lưu trử thông tin A Bàn phím B CPU C Chuột D RAM Câu 2: Để thực tạo thư mục ta dung lệnh sau A CD B RD C MD D ND Câu 3: Với công việc bạn cần phải mở thực đơn lệnh format A Khi muốn ghi lưu tệp văn B Khi muốn đổi phong chữ C Khi muốn đặt trang văn nằm ngang để vẽ bảng biểu co nhiều cột D Khi muốn càu đặt máy in Câu 4: Trong lệnh Pascal sau, lệnh không hợp lệ A If a=b and b=c then B If (a=b) and (b=c) then C If (a=b and b=c) then D If (a=b) and b=c then Câu 5: Ta sử dụng khai báo strong cho A Kiểu số thực B Kiểu xâu C Kiểu số nguyên D Kiểu kí tự Câu 6: Khi dăng nhập tronh excel, phím tắt sau giúp bạn xuống dịng cung A Shift + Enter B Alt + Enter C Ctrl + Enter D Enter Câu 7: Hệ đếm số dùng máy tính A Hệ thập phân B Hệ nhị phân C Hệ bát phân D Hệ thập lục phân Câu 8: Khi thực tạo văn với MS-DOS phím tắt giúp đầu dịng lệnh nào? A Enter B Shift C Home D End Câu 9: Có thể hồi phục (Restore) tệp tin bị xóa sau nhấn phím Delete cách A Mở Internet Ẽplorer B Mở Mycomputer C Mở My Document D Mở Recycle bin Câu 10: Trong Pascal muốn dos nhanh sử dụng lệnh A Exit B Dos cell C Open D Save as Câu 11: 1kB = ? byte A 10 byte B 100 byte C 1042 byte D 1024 byte Câu 12: Một quy định đặt tên chương trình Tubor pascal,phát biểu A Tên dịng khơng q kí tự B Chỉ dùng chử để dặt tên C Không dùng dấu gạch cho câu D Tên không bắt đầu chữ số Câu 13: Lệnh sau dùng để xóa hình A CLS B RD C TYPE D CD Câu 14: Virus tin học A Làm hỏng liệu B Làm hỏng thiết bị Câu15: 1byte = ? C Làm hỏng đường dây điện D Cả A,B,C A bit B bit C 12 bit D.16 bit Câu 16 Trong tên sau đây, tên hợp lệ ngôn ngữ lập trình Pascal A 8a B.tinhdientich C Program D tinh tong va tich Câu 17 Để nhập liệu ta dùng lệnh A Clrscr; B X:= ‘dulieu’; C Write(‘Nhap du lieu’); D.Readln(x); Câu 18 Biểu thức toán học (a2 +2b)(1+c)3 biểu diễn Pascal? A (a*a +2*b)(1+c)(1+c)(1+c) B(a.a+2.b)(1+c)(1+c)(1+c) C.(a2 +2.b)(1+c)3 D.(a*a +2*b)*(1+c)*(1+c)*(1+c) Câu 19 KÝ hiệu := đợc sử dụng: A So sánh B kiểu kí tự C Gán giá trị cho biến D Tất sai Cõu 20 Cu trỳc ca mt chng trình Pascal thường có phần sau: A Phần thân, phần cuối B Phần thân, phần khai báo, phần cuối C Phần khai báo, phần thân, phần cuối D Phần chương trình, phần cuối TỰ LUẬN: BÀI 1: Viết chương trình nhập từ bàn phím kí tự C cho biết khả khả sau xảy ra: C chữ thường ; C chữ hoa; C chữ số Bài 2: Lập phương trình tạo mảng chứa bảng cửu chương Bài Viết chương trình tính tiền khách hàng phải tốn tiền mua sách sau:Mợt hiệu sách nhân dịp cuối năm đã thực hiện một đợt khuyến mãi lớn với nội dung sau: Nếu khách hàng mua sách với tổng số tiền ít nhất là 100 nghìn đồng, khách hàng sẽ được giảm 30% tổng số tiền phải toán; và nếu khách hàng mua sách với tổng số tiền ít 100 nghìn đồng, khách hàng sẽ được giảm 10% tổng số tiền phải toán Bài 4: Viết chương trình thực công việc sau : _ Lập thủ tục nhập ba số thực dương a , b , c từ bàn phím _ Lập thủ tục kiểm tra xem ba số có lập thành ba cạnh tam giác hay khơng ? _ Viết thủ tục tính diện tích tam giác _ Viết thủ tục tính trung tuyến tam giác _ Viết hồn thiện chương trình ĐÁP ÁN: LÍ THUYẾT CÂU 1 1 1 1 1 2 Đ Án D C B D D B B C D B D D A D B B B D C C TỰ LUẬN: Bài 1: (2d) Var c:char; Begin Write( ‘nhap ki tu c =’); readln(c); If(c>= ‘a’) and (c= ‘A’) and ( c=’0’) and (c 100000 then writeln(‘So tien phai toan la :’,70%*T:7:0) else writeln(‘So tien phai toan la :’,90%*T:7:0); Readln; End Bài 4: (3d) Program Bai3: Uses Crt; Var a, b, c: real ; (*================================*) Procedure Nhap(Var a, b, c: real); Procedure input (Var a: real; tenbien: Char); Begin Repeat Write('Nhap ' + tenbien+' = '); Readln(a); Until (a>=0); End; Begin (* bắt đầu thủ tục nhập *) Input(a, 'a'); Input(b, 'b'); Input(c, 'c'); End; (* kết thúc thủ tục nhập *) (*================================*) Procedure Kiemtra(a, b, c: Real); Begin If (a