第三屆奧林匹克分區(qū)聯(lián)賽初賽試題高中組basic語言_第1頁
第三屆奧林匹克分區(qū)聯(lián)賽初賽試題高中組basic語言_第2頁
第三屆奧林匹克分區(qū)聯(lián)賽初賽試題高中組basic語言_第3頁
已閱讀5頁,還剩2頁未讀 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡介

1、第三青少年信息學(xué)(計(jì)算機(jī)分區(qū)聯(lián)賽初賽(高中組(BASIC 語競賽用時(shí):2 小時(shí) WPS 是屬類;FOXBASE 是屬類令“CRETEGZB,第三青少年信息學(xué)(計(jì)算機(jī)分區(qū)聯(lián)賽初賽(高中組(BASIC 語競賽用時(shí):2 小時(shí) WPS 是屬類;FOXBASE 是屬類令“CRETEGZB,文件 在MSDOS 試問:C:TIME G BT 設(shè)數(shù)組A10.100,20.100 以行優(yōu)先的方式順 210;第二個(gè)字節(jié)是區(qū)位碼的位碼加。 DCABA 能否從A出發(fā),找出去每個(gè)城市且只去一次的通路來?EF X/Y 寫為/XY 和后綴 X/Y XY/的表達(dá)形式。(P+Q)*(R-S)*+PQ-RS 或 PQRSA- X

2、/Y 寫為/XY 和后綴 X/Y XY/的表達(dá)形式。(P+Q)*(R-S)*+PQ-RS 或 PQRSA- (a) 1H1這個(gè)運(yùn)動(dòng)用字母a1hah2332) 1Lb 3Lb2312 12hh2331最簡單的運(yùn)算表達(dá)式(借助于a,b與乘法運(yùn)算131b231223bbb可以表示為(bb)-1(1a-(a)- (3)(aa)a)131b231223bbb可以表示為(bb)-1(1a-(a)- (3)(aa)a)-1(4)b-1例如:12 有因子2,2,3,4,6,所以可表示為: 12=223=43=26給出任一個(gè)正整數(shù) N,求出它所有的因子乘積的表達(dá)式(交換律得出的不同式子算同讀入一個(gè)整數(shù)N,首先求

3、出它的所有的因子以及每個(gè)因子可能的次數(shù)。例如:整數(shù)48:因子次數(shù)1110DIM20INPUT30FORi:=1TO20:a(i,1)=0:NEXT40 :50 60FORi=2TOn-70s=0:80IFm=0OR(m/i)THEN90 (m/i): :GOTO100 IF then 120110 : a(j,2)=120NEXT130FORi=0TOj:b(i)=0:NEXT140IFb(0)=0THEN150 160IFk=0THEN165 if thenk=k-1:GOTO160 170 b(k)=b(k)+1180FOR:bL=0:NEXTL190 200FORi=1TO210IFb(

4、i)=0THEN180FOR:bL=0:NEXTL190 200FORi=1TO210IFb(i)=0THEN215FORL=1TOb(i) 220NEXT225IFsnTHEN230FORi=1TOj:234 240FORi=1TO250IFc(i)=0THEN255P=P*A(I,1):IFP=NTHEN 260 a(i,1);”*”;:C(I)=C(I)-1:GOTO290NEXT295 300GOTO310 形必須有一條邊(僅能有一條邊)與凸多邊形的邊相重合,例如:下面的5 邊形中,可5ABECD2 個(gè)坐標(biāo)之后,找出一個(gè)面積最大的內(nèi)接三10 20DIM30FORi=1TOn:INPUT

5、g(i,1),g(i,2):NEXT40FORi=1TOn-50 :NEXTi 60 smax=070FORi=1TO80FOR90s1=SQR(g(i,1)-(g(i+1,1)*(g(i,1)-(g(i+1,1)+(g(i,2)-(g(i+1,2)*(g(i,2)-100s2=SQR(g(i,1)-(g(j,1)*(g(i,1)-(g(j,1)+(g(i,2)-(g(j,2)*(g(i,2)-110s3=SQR(g(i+1,1)-(g(j,1)*(g(i+1,1)-(g(j,1)+(g(i+1,2)-(g(j,2)*(g(i+1,2)-120 p=90s1=SQR(g(i,1)-(g(i+1

6、,1)*(g(i,1)-(g(i+1,1)+(g(i,2)-(g(i+1,2)*(g(i,2)-100s2=SQR(g(i,1)-(g(j,1)*(g(i,1)-(g(j,1)+(g(i,2)-(g(j,2)*(g(i,2)-110s3=SQR(g(i+1,1)-(g(j,1)*(g(i+1,1)-(g(j,1)+(g(i+1,2)-(g(j,2)*(g(i+1,2)-120 p= 140 IF THEN 170150smax=s:x1=g(i,1):y1=g(i,2) 160 x2=g(i+1,1):y2=g(i+1,2)165 170NEXT180NEXT190 PRsmax,x1,y1,

7、x2,y2,x3,y3 200 END 212的長方形:(2的22 2 4 的長方形(4的長方形(包括正方形)8 82163 yy或yxxxyx當(dāng)給出n之后,可能拼接的次數(shù)r滿足:2r=N2r+1(1的拼法10DIM20INPUTyy或yxxxyx當(dāng)給出n之后,可能拼接的次數(shù)r滿足:2r=NjTHENIF (gw1=g(jeg,1)AND gw2=g(jeg,2) OR(gw1=g(jeg,2)ANDgw2=g(jeg,1) THEN eg=0:GOTO 173GOTO177IFeg=0THEN 178 j=j+1:g(j,1)=gw1: :g(j,3)=gw3 180 NEXT i1185 NEXT200FO

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

最新文檔

評論

0/150

提交評論