VFP改错帮帮忙!1.题目:下列的程序功能是:求出不超过6位数的Armstrong数.所谓* Armstrong数是指一个n位数的正整数,它的每位数字的n次方* 之和等于该数本身.例如:153=1^3+5^3+3^3 要求:
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/17 02:39:56
![VFP改错帮帮忙!1.题目:下列的程序功能是:求出不超过6位数的Armstrong数.所谓* Armstrong数是指一个n位数的正整数,它的每位数字的n次方* 之和等于该数本身.例如:153=1^3+5^3+3^3 要求:](/uploads/image/z/12972448-64-8.jpg?t=VFP%E6%94%B9%E9%94%99%E5%B8%AE%E5%B8%AE%E5%BF%99%211.%E9%A2%98%E7%9B%AE%EF%BC%9A%E4%B8%8B%E5%88%97%E7%9A%84%E7%A8%8B%E5%BA%8F%E5%8A%9F%E8%83%BD%E6%98%AF%EF%BC%9A%E6%B1%82%E5%87%BA%E4%B8%8D%E8%B6%85%E8%BF%876%E4%BD%8D%E6%95%B0%E7%9A%84Armstrong%E6%95%B0.%E6%89%80%E8%B0%93%2A+++++++Armstrong%E6%95%B0%E6%98%AF%E6%8C%87%E4%B8%80%E4%B8%AAn%E4%BD%8D%E6%95%B0%E7%9A%84%E6%AD%A3%E6%95%B4%E6%95%B0%2C%E5%AE%83%E7%9A%84%E6%AF%8F%E4%BD%8D%E6%95%B0%E5%AD%97%E7%9A%84n%E6%AC%A1%E6%96%B9%2A+++++++%E4%B9%8B%E5%92%8C%E7%AD%89%E4%BA%8E%E8%AF%A5%E6%95%B0%E6%9C%AC%E8%BA%AB.%E4%BE%8B%E5%A6%82%EF%BC%9A153%3D1%5E3%2B5%5E3%2B3%5E3+++%E8%A6%81%E6%B1%82%EF%BC%9A)
VFP改错帮帮忙!1.题目:下列的程序功能是:求出不超过6位数的Armstrong数.所谓* Armstrong数是指一个n位数的正整数,它的每位数字的n次方* 之和等于该数本身.例如:153=1^3+5^3+3^3 要求:
VFP改错帮帮忙!
1.题目:下列的程序功能是:求出不超过6位数的Armstrong数.所谓
* Armstrong数是指一个n位数的正整数,它的每位数字的n次方
* 之和等于该数本身.例如:153=1^3+5^3+3^3 要求:
* (1)将下列程序输入到项目的程序文件pcode中,并对其中的
* 2条错误语句进行修改;
* (2)在修改程序时,不允许修改程序的总体框架和算法,不允许
* 增加或减少语句数目.
*-------------------------------------------------------
clear
for m=1 to 100000
n=len(allt(str(m)))
x=0
for y=1 to n
c=substr(allt(str(m)),y,1)
else
if Mmin>a(i) and mod(a(i),2)=1
Mmin=a(i)
endif
endfor
?"最大偶数:",iif(Mmax=-1,"无",Mmax)
?"最小奇数:",iif(Mmin=100,"无",Mmin)
VFP改错帮帮忙!1.题目:下列的程序功能是:求出不超过6位数的Armstrong数.所谓* Armstrong数是指一个n位数的正整数,它的每位数字的n次方* 之和等于该数本身.例如:153=1^3+5^3+3^3 要求:
1
clear
for m=1 to 100000
n=len(allt(str(m)))
x=0
for y=1 to n
c=substr(allt(str(m)),y,1)
else
if Mmin>a(i) and mod(a(i),2)=1
Mmin=a(i)
endif
endif
endfor
?"最大偶数:",iif(Mmax=-1,"无",Mmax)
?"最小奇数:",iif(Mmin=100,"无",Mmin)