一個六位數(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=①
d2=②
Loop Until n＞=1000000
Print t
‘備注：loop until 指的是循環(huán)到若條件成立則退出循環(huán)．

【考點】算術類基本運算；賦值語句．

【答案】n\10000；'取高二位；nmod100；'取低二位