Đề thi chọn học sinh giỏi môn Tin học lớp 12 năm học 2012-2013 – Sở Giáo dục và Đào tạo Ninh Bình (Đề chính thức)

Đề thi chọn học sinh giỏi môn Tin học lớp 12 năm học 2012-2013 – Sở Giáo dục và Đào tạo Ninh Bình (Đề chính thức) dành cho các em học sinh trong quá trình ôn luyện, luyện thi vượt qua các đội tuyển chọn học sinh giỏi gặt hái nhiều thành công.
Nội dung trích xuất từ tài liệu:
Đề thi chọn học sinh giỏi môn Tin học lớp 12 năm học 2012-2013 – Sở Giáo dục và Đào tạo Ninh Bình (Đề chính thức) SỞGD&ĐTNINHBÌNH ĐỀTHICHỌNHỌCSINHGIỎILỚP12THPT KỳthithứnhấtNămhọc2012–2013 ĐỀTHICHÍNHTHỨC MÔN:TINHỌC Ngàythi:09/10/2012 (Thờigianlàmbài:180phút) Đềthigồm04câu,trong02trang Tổngquanđềthi: Câu Tênfilebàilàm TênfileInput TênfileOtput Thờigianchạy 1 NUMBER.PAS NUMBER.INP NUMBER.OUT 1giây/test 2 GOMBI.PAS GOMBI.INP GOMBI.OUT 1giây/test 3 TRIANGLE.PAS TRIANGLE.INP TRIANGLE.OUT 2giây/test 4 PASCAL.PAS PASCAL.INP PASCAL.OUT 1giây/testGhichú:Thísinhphảiđặttênfilebàilàm,fileInput,fileOutputtheoquyđịnhnhưtrên.Câu1:ChữsốthứN.Khiviếtcácsốtựnhiêntăngdầntừ1,2,3,…liêntiếpnhau,tanhậnđượcmộtdãycácchữsốthậpphânvôhạn,đoạnđầutiêncủadãysẽlà:1234567891011121314151617181920...Yêucầu:HãytìmchữsốthứNcủadãysốvôhạntrên.Dữliệu:ChotrongfileNUMBER.INPgồmmộtnguyêndươngN(NYêucầu:Xácđịnhsốtamgiáccâncóbađỉnhlàbađiểmtrongsốnđiểmđãcho.Dữliệu:ChotrongfileTRIANGLE.INP: Dòngđầutiênchứasốnguyênn. Dòngthứitrongndòngsauchứa2sốnguyênxivàyi.Kếtquả:GhirafileTRIANGLE.OUTsốtamgiáccântìmđược.Vídụ: TRIANGLE.INP TRIANGLE.OUT 4 4 0 0 1 1 1 0 0 1Chúý:Trong60%sốtestcón 3 4 3 2 8 8 11Chúý:Trong40%sốtestcón HƯỚNGDẪNCHẤMTHICHỌNHỌCSINHGIỎILỚP12THPT KỳthithứnhấtNămhọc2012–2013 MÔN:TINHỌCChấmbằngchươngtrìnhtựđộngAMM2: Câu1:10test,mỗitestđúngcho0,5điểm. Câu2:10test,mỗitestđúngcho0,5điểm. Câu3:10testđầu,mỗitestđúngcho0,3điểm.10testsau,mỗitestđúngcho0,2điểm. Câu4:10test,mỗitestđúngcho0,5điểm.Bài1:Constfi=number.inp;fo=number.out; cs:array[1..8]oflongint=(9,180,2700,36000,450000,5400000,63000000,720000000);Varn:longint;f,g:text;Functionnum(n:longint):char;vark,so,mu:longint;s:string;Begin k:=1;mu:=1; while(kbeginassign(f,fi);reset(f);readln(f,n,m);fori:=1tomdoreadln(f,u[i],v[i]);close(f);fori:=1tondocha[i]:=1;end;procedureJoin(u,v:longint);beginWhilecha[u]>0dou:=cha[u];Whilecha[v]>0dov:=cha[v];ifu=vthenexit;ifcha[u]n,d:integer;tong:extended;proceduredoc;vari:integer;beginassign(f,fi);reset(f);readln(f,n);fori:=1tondoreadln(f,a[i].x,a[i].y);close(f);end;functiontruoc(t1,t2:td):boolean;begintruoc:=true;ift1.ykc[dau]:=kc[cuoi];kc[cuoi]:=tg;dau:=dau+1;cuoi:=cuoi1;end;untildau>cuoi;ifl1thenbeginqsort(1,d);tinh(kc);end;end;end;procedureloaitru;vari,j,l,r,m,d,c,u:integer;look:td;nb:boolean;beginfori:=1tondoforj:=i+1tondobeginif((a[i].x+a[j].x)mod2=0)and((a[i].y+a[j].y)mod2=0)thenbeginlook.x:=(a[i].x+a[j].x)div2;look.y:=(a[i].y+a[j].y)div2;l:=1;r:=n;whilellook.y)or((a[m].y=look.y)and(a[m].x>look.x))thenr:=m1elseif(a[m].ysobit:=0;fori:=0to31doif(1shli)andn0theninc(sobit);write(g,1shlsobit);close(f);close(g);end. SỞGD&ĐTNINHBÌNH ĐỀTHICHỌNHỌCSINHGIỎILỚP12THPT KỳthithứnhấtNămhọc2012–2013 ĐỀTHICHÍNHTHỨC MÔN:TINHỌC Ngàythi:10/10/2012 (Thờigianlàmbài:180phút) Đềthigồm04câu,trong02trang Tổngquanđềthi: Câu Tênfilebàilàm TênfileInput TênfileOtput Thờigianchạy 1 TOUR.PAS TOUR.INP TOUR.OUT 1giây/test 2 HAIVAN.PAS HAIVAN.INP HAIVAN.OUT 1giây/test 3 FROG.PAS FROG.INP FROG.OUT 1giây/test 4 EC.PAS EC.INP EC.OUT 1giây/testCâu1:Thămquan.CóNđoànkháchdulịchđượcđánhsốtừ1đếnNđangchờCôngtydulịchNinhBìnhđưađi thămquantheohợpđồng.Đoànthứ isẽ đitớithămquan ở địađiểmcáchtrụ sở Côngtyd i km.CôngtycóMxekhách(N≤M)đánhsốtừ1tớiM,xethứjcómứctiêu ...