试题 试卷
题型：单选题 题类：常考题 难易度：普通
【bj】高中信息技术综合库——面向对象程序设计 VB开发工具
a = i \ 100
b = i \ 10 Mod 10
c = i Mod 10
If i = a * a * a + b * b * b + c * c * c Then
Label1.Caption = Str(i)
End If
Next i
解密规则：将整数中各个位中的每一位值乘以5，然后除以8所得余数即为该位的值，然后将所得数的首末位进行交换。如数字9357，解密后的值为3715。
试题篮
