有三种方法
方法一:
clear
for i=100 to 999
a=val(left(str(i,3))) &&这些函数都在书的66页上
b=val(substr(str(i,3),2,1))
c=val(right(str(i,3),1))
if a**3+b**3+c**3=i &&如果立方和等于它本身
?i
endif
endfor
方法二:
clear
for i=100 to 999
a=INT(i/100) &&a表示百位数
b=INT((i-100*a)/10) &&b表示十位数
c=i%10 &&c表示个位数
*就是分家的方式不同而已
if a**3+b**3+c**3=i &&如果立方和等于它本身
?i
endif
endfor
方法三,我的一个学生想的方法,三个FOR循环嵌套也可以
clear
for a=1 to 9 &&百位没有0
for b=0 to 9
for c=0 to 9
if a**3+b**3+c**3=a*100+b*10+c
?a*100+b*10+c
endif
endfor
endfor
endfor
循环用到的变量,i一般是循环变量,再循环过程中i的值会有所变换;S一般是和变量,存放最后的运算结果。比如:编程求1到5的和的程序
i=0//定义一个循环变量i,并赋值为0,即循环变量的初始值为0
s=0 //定义一个和变量S,并赋值为0
do while i<=5 //开始循环,并且规定循环变量i的终止值为5
s=s+i//循环中完成变量的累加
i=i+1 //循环中循环变量递增,即从1到2,2到3,——以此类推
enddo //循环结束
?s //输出求出的和
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)