您所在位置：主题：[讨论]看看!!阿姆斯特朗数
whj8820
[专家分：0] 发布于 2007-10-17 08:34:00
下列程序是输出 1 ~ 2000 之间所有的阿姆斯特郎数
10 for i = 1 to 2000
20 s= 0
30 k = i
40 while k < > 0
50 q = int ( k/10)
60 r = k - 10 * q
70 s = s + q*q*q
80 k=q
90 wend
100 if i = s then print i
110 next i
120 end
问下第 50 行 q = int(k/10) 的作用是什么?
while 与 wend 之间的循环体用意是什么?
10 for i = 1 to 2000
20 s= 0
30 k = i
40 while k < > 0
50 q = int ( k/10)
60 r = k - 10 * q
70 s = s + q*q*q
80 k=q
90 wend
100 if i = s then print i
110 next i
120 end
问下第 50 行 q = int(k/10) 的作用是什么?
while 与 wend 之间的循环体用意是什么?
