一個六位數(shù)n,它的高二位與低二位恰好相同，同時又能被97整除，如109610、196619等．編寫VB程序，統(tǒng)計所有符合條件的六位數(shù)的個數(shù)．
Dim n As Long'六位數(shù)
Dim g2 As Integer'高二位
Dim d2 As Integer'低二位
Dim t As Integer'計數(shù)
t=0
n=100000
Do
g2=n\10000n\10000①'取高二位'取高二位
d2=nmod100nmod100②'取低二位'取低二位
Loop Until n＞=1000000
Print t
‘備注：loop until 指的是循環(huán)到若條件成立則退出循環(huán)．
【考點】算術(shù)類基本運算；賦值語句．
【答案】n\10000；'取高二位；nmod100；'取低二位
【解答】
【點評】
聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。
發(fā)布：2024/4/20 14:35:0組卷：16引用：1難度：0.3
把好題分享給你的好友吧~~