歷年算法與程序設(shè)計(jì)學(xué)業(yè)水平考試真題(帶答案)(編輯修改稿)
2024-07-21 22:42 本頁面
【文章內(nèi)容簡(jiǎn)介】 Sub計(jì)算1+2+3+……+100的值。Private Sub Form_Activate( ) Dim i, s AS Integer s=0 For i=1 TO 100 s= s+i Next i Print “S=”。 sEnd Sub計(jì)算1+3+5+……+99的值。Private Sub Form_Activate( ) Dim i, s AS Integer s = 0 for i =1 to 99 Step 2 s = s+i Next i Print “S=”。s End Sub分析程序，寫出計(jì)算結(jié)果Private Sub Form_Activate() Dim i,S as integer S=1 For i=1 to 4 S=S*i Next iPrint “S=”。SEnd Sub運(yùn)行結(jié)果:_____S=24_________ 計(jì)算1+1/2+……+1/50的值。 Private Sub Form_activate() Dim i,s as integer s=0 For i=1 to ___50 step 1______ s=___s+1/i________ Next i Print “S=”。s End Sub分析程序，寫出計(jì)算結(jié)果Private Sub Form_Activate() Dim I As Integer, S As Integer S = 0 For I = 2 To 6 S = S + I Next IPrint S=。 SEnd Sub運(yùn)行結(jié)果:____ ___S=20___________9．p=1 For i=1 to 5 p=p+i next i print “I,P 分別為：”。 i,p 輸出：I，P 分別為：_6___,___16___10．Sum=0 For i=1 To 100 sum=sum+2 Next i print “Sum=”。 sum 輸出：__ Sum=200________11．下面是1+1/2+1/3+…+1/100 的和的程序，該程序循環(huán)終止時(shí) i 的值是多少？（ 101 ） sum=0 For i=1 To 100 sum=sum+1/i next i12．a(chǎn)=1。 b=0 Do while a=5 b=b+a*a a=a+1 Loop Print a, b 屏幕上顯示的內(nèi)容是：__6__ ，__55__13．完善程序，打印如下圖形 *********************For I = 1 To 6For j = 1 To__i__ Print *。 Next j Print__ Next i ______________14．執(zhí)行下列程序段后，變量x 的值為：（ 9 ）x=3。y=77DO WHILE xsqr(y) x=x+2LOOP15．p = 0: n = 5For I = 1 To n p = p + I * 2If p = 10 Then Exit For Next IPrint p 答案：__12__16．Ch=”DEF” For i=1 to 3 ch=ch
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1