读书人

求所有小于或等于100的自然数队。设计

发布时间: 2012-02-02 23:57:14 作者: rapoo

求所有小于或等于100的自然数队。设计程序
for i=100 to 0
for n=0 to 100
s=i-n
for x=1 to 100
if s=x*x
?i,n
endif
endfor
endfor
endfor
这只是我写的一个小部分,
for x=1 to 100
if s=x*x
?i,n
endif
执行这个的时候跳不出来了。
该如何办啊

[解决办法]
set talk off
clear
for i=0 to 100 step 1
for n=0 to 100 step 1
s=i-n
m=i+n

for x=1 to 15
for y=1 to 15
if s=x*x and m=y*y
?i,n
endif
endfor
endfor
endfor
endfor

读书人网 >VFP

热点推荐