一个六位数n，它的高二位与低二位恰好相同，同时又能被97整除，如109610、196619等．编写VB程序，统计所有符合条件的六位数的个数．DimnAsLong'六位数Dimg2AsInteger'高二位Dimd2AsInteger'低二

Question

一个六位数n，它的高二位与低二位恰好相同，同时又能被97整除，如109610、196619等．编写VB程序，统计所有符合条件的六位数的个数．
Dim n As Long'六位数
Dim g2 As Integer'高二位
Dim d2 As Integer'低二位
Dim t As Integer'计数
t=0
n=100000
Do
g2=___①___
d2=___②___
Loop Until n>=1000000
Print t
‘备注：loop until 指的是循环到若条件成立则退出循环．

Answer 1

取出高二位的方法是：g2=n\10000，取出低二位的方法是d2=n mod 100．
故答案为：g2=n\10000；d2=n mod 100．