程序没有错误 但是运行后却没有反应 这是怎么回事
题目是 输出1000以内的完数及其因子我的程序是
dime a(1000)
for i=1 to 1000
m=1
s=0
k=1
j=1
do while j<m
if m%j=0
s=s+j
a(k)=j
k=k+1
endif
j=j+1
enddo
if s!=0 and s=m
j=1
?'因子是: '
do while j<k
?? a(j),' '
j=j+1
enddo
?'完数是',i
?
endif
endfor
点击运行后,系统没有提示说哪里错误,但是也毫无反应,界面上什么也没有,请问这是怎么回事?