[填空题] 下列程序的功能是求336的个位和十位数的值,填空补充程序。
Private Sub Command1 Click()
n=1
For i=1 To 6
n=n*33
n=n Mod 100
Next i
m= 【12】
n= 【13】
Print"十位数是”;n;”个位数是”;m
End Sub
[12]n Mod 10 [13]n10
参考解析:循环中,n=n Mod 100使得n中保存乘积的最后两位数,因此循环结束后对n模10得到个位数,再对n整除10得到十位数。


![[填空题] 下列程序的功能是求336的个位和十位数的值,填空补充程序。 Private Sub Command1 Click() n=1 For i=1 To 6 n=n*33 n=n Mod 1 [填空题] 下列程序的功能是求336的个位和十位数的值,填空补充程序。 Private Sub Command1 Click() n=1 For i=1 To 6 n=n*33 n=n Mod 1](http://www.mshxw.com/aiimages/31/481575.png)
