求所有小于或等于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
