.prg文件不存在,求助啊
这是源程序clear
set udfparms to reference
input "x=" to x
input "y=" to y
declare m(x,y)
p1(m(x,y))
p2(m(x,y))
if n=n1
?n
else
?"no"
endif
procedure p1
parameters m
n=1
for a=1 to y
for i=1 to x
if n<m(i,a) &&这里报错的
n= m(i,a)
endif
endfor
endfor
return n
procedure p2
parameters m
n1=1
for i=1to x
for a=1 to y
if n1>m(i,a)
n1 = m(i,a)
endif
endfor
endfor
return n1