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