请程序高手帮忙解决一道VF的程序设计题!感激不尽!

2024-12-30 07:21:24
推荐回答(2个)
回答1:

这是计算机等级考试教材(高等教育出版社)上的一道例题,在第二章里.
有三种方法
方法一:
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

回答2:

for I=100 TO 999
a=INT(i/100) &&a表示百位数
b=INT((i-100*a)/10) &&b表示十位数
c=i%10 &&c表示个位数
IF I=A**3+B**3+C**3
?I
ENDIF
ENDFOR