當(dāng)前位置： 2020年上海市徐匯區(qū)學(xué)業(yè)水平信息技術(shù)試卷> 試題詳情

如果把一個自然數(shù)從中間數(shù)位劈成兩半，把這兩半的數(shù)加起來，再平方，正好和原數(shù)相等，則這樣的數(shù)被稱為“雷劈數(shù)”。例如3025是雷劈數(shù)，因為30+25=55，55^2=3025。請找出所有滿足以上雷劈數(shù)條件的4位自然數(shù)，并求和。
（1）解題思路1：將該4位自然數(shù)的高兩位和低兩位分別用變量a,b來進行列舉，則a和b的列舉范圍是
C
C
。
A．a(chǎn)：0～99；b：0～99
B．a(chǎn)：1～99；b：1～99
C．a(chǎn)：10～99；b：0～99
D．a(chǎn)：10～99；b：10～99
（2）解題思路1中，檢驗a,b組成的四位數(shù)是否符合條件的VB表達式是
D
D
。
A．a(chǎn)^2+b^2=100a+b
B．a(chǎn)+b^2=100a+b
C．a(chǎn)b^2=100a+b
D．（a+b）^2=100*a+b
（3）解題思路2：將該4位自然數(shù)存入變量x中并進行列舉，在列舉過程中取出x的高兩位和低兩位并分別存入變量a,b中，再通過分支結(jié)構(gòu)進行雷劈數(shù)條件的檢驗。其中取出x的高兩位賦值給a,取出x的低兩位賦值給b的VB表達式正確的是
A
A
。
A．a(chǎn)=Int（x/100）：b=x mod 100
B．a(chǎn)=x/1000：b=x Mod 10
C．a(chǎn)=x\1000：b=x mod 100
D．a(chǎn)=x\100：b=x Mod 10
（4）請在以上兩種解題思路中選擇一種（其他方法不得分），填于下方空格處，然后完成VB程序的編寫，輸出符合雷劈數(shù)條件的4位自然數(shù)的和。（本題4分）
解題思路
1
1
（填1或2）的代碼如下：

【考點】編輯事件處理過程的代碼．

【答案】C；D；A；1

【解答】

【點評】

聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。

當(dāng)前模式為游客模式，立即登錄查看試卷全部內(nèi)容及下載

發(fā)布：2024/6/27 10:35:59組卷：1引用：1難度：0.3

相似題

1．日期判斷
從文本框Text1輸入一個8位數(shù)字表示的日期，其中第1到4位表示年（第1為確定不為零），第5到6位表示月，第7到8位表示日．單擊“判斷”按鈕，判斷該日期是否合法，將結(jié)果依次輸出到列表框List1．程序界面如圖所示：

提示：年份值符合下列兩種情況之一的是閏年．
1．年份是4的倍數(shù)，但不是100的倍數(shù)；
2．年份是400的倍數(shù)．
（1）觀察程序代碼，可知“判斷”按鈕的對象名為

．（單選，填字母：A．Text1/B．List1/C．Command1/D．Judge/E．判斷）
（2）為實現(xiàn)上述功能，請在橫線處填入合適的代碼．
Private Sub Judge_Click（　　）
   Dim riqi As String,st As String
   Dim year As Integer,month As Integer,day As Integer
   Dim rn As Boolean,hefa As Boolean
   riqi=Text1．Text
   year=Val（Mid（riqi,1，4））
   month=Val（Mid（riqi,5，2））
   day=

'第①處
   st=Str（year）+“年“+Str（month）+“月“+Str（day）+“日“
   rn=False'用于判斷是否為閏年
   If

Then rn=True'第②處
   If year Mod 4=0 And year Mod 100＜＞0 Then rn=True
   hefa=True'用于判斷是否為合法日期
   If month=0 Or month＞12 Then hefa=False
   If day=0 Then hefa=False
   If （month=1 Or month=3 Or month=5 Or month=7 Or'與下一行語句同行
      month=8 Or month=10 Or month=12）And day＞31 Then hefa=False
   If （month=4 Or month=6 Or month=9 Or month=11）'與下一行語句同行
      And day＞30 Then hefa=False
   If

Then hefa=False
'第③處，判斷閏年2月的天數(shù)是否合法
   If month=2 And Rn=False And day＞28 Then hefa=False
   If hefa=True Then st=st+“合法日期“Else st=st+“非法日期“
   List1．AddItem st
End Sub
第①處代碼為

第②處代碼為

第③處代碼為

．
發(fā)布：2024/10/31 8:0:1組卷：4引用：1難度：0.1
解析
2．水往低處流，下雨時道路上的低洼地總會有積水?，F(xiàn)利用一組數(shù)據(jù)表示某地面的高度變化，高度值為正整數(shù)，相鄰高度用直線連接，請設(shè)計程序統(tǒng)計出該地面有多少處低洼地。

（1）用計算機編程解決問題的一般過程包括：①編寫程序②抽象與建模③設(shè)計算法④調(diào)試運行程序正確的順序應(yīng)該是

。
（2）算法實現(xiàn)中會遍歷每一個地面高度數(shù)據(jù)，合適的算法控制結(jié)構(gòu)是

。
A.順序結(jié)構(gòu)
B.分支結(jié)構(gòu)
C.循環(huán)結(jié)構(gòu)
D.樹形結(jié)構(gòu)
（3）若地面高度數(shù)據(jù)為[0，1，0，2，1，2，0，0，2，0]，則該地面有

處低洼地。
（4）實現(xiàn)上述功能的代碼如下，請在橫線處填入合適的代碼。
（5）在程序代碼中，加框處代碼存在錯誤，請改正。
發(fā)布：2024/10/31 20:0:1組卷：8引用：2難度：0.3
解析
3．根據(jù)程序來回答問題
sum=0
for i in range（1，10，3）：
sum+=i
print（“sum=”，sum）
（1）循環(huán)變量i的初始值為

，終止值為

，步長值

。
（2）該程序段執(zhí)行后，輸出的結(jié)果為

。
（3）該程序循環(huán)語句sum+=i共執(zhí)行了

次。
發(fā)布：2024/11/1 19:30:1組卷：4引用：1難度：0.4
解析

把好題分享給你的好友吧~~