这几天,竭力抵御超级台风SAOMAI,学习稍有放松,今天又来请教小问题一个，望各位不吝赐教.
习题:
set talk off
set proc to proc123
public i , j
i=1
do proc1
j=1
k=1
...... (省略若干无关行)
do proc2
........

proc proc2
private j
j=j*2+1
执行到这里的时候,系统提示出错,说:找不到变量j
是否用private隐藏了j之后,在过程中的表达式用了还没定义的j变量出错
但是这个书上课后习题,让写出程序的运行结果,可不是找出程序段的错误行哦.

习题中没有参数传递的那两条语句,这个习题是检查"内存变量属性"这一知识点的
源程序如下:
set talk off
set proc to proc123
public i,j
i=1
?"i="+str(i,2)
do proc1
?"i="+str(i,2)
j=1
k=1
do proc2
?"j="+str(j,2)
?"k="+str(k,2)
set talk on

proc proc2
priv j
j=j*2+1 &&这里出错了,我感觉是priv j这条语句,使表达式找不到变量j
k=k*2+1
do proc3
return
endproc

proc proc3
?"k="+str(k,2)
k=k*k
return
endproc

过程文件proc123的内容
proc proc1
i=i*2+1
return
endproc

[此贴子已经被作者于2006-8-11 12:31:24编辑过]