这是源程序
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

就是这个问题吗？

没有设置数组元素的值，但是xy的值都有

input "x=" to x
input "y=" to y
declare m(x,y)
*加了一下代码还是会报那个错误
for i =1 to x*y
   store i to m(i)
endfor
我用这个程序检测一下，显示的是1 2 3，说明m是赋值成功了吧？
input "x=" to x
input "y=" to y
declare m(x,y)
for i =1 to x*y
   store i to m(i)
endfor
?m(1),m(2),m(3)