INPUT m
INPUT n
DIM a(m,n)
FOR i=1 TO m
FOR j=1 TO n
a=INT(RND(100))
NEXT
NEXT
FOR i=1 TO m
FOR j=1 TO n
PRINT a(i,j)," ";
NEXT
PRINT
NEXT
max=a(1,1)
x=1
y=1
FOR i=1 TO m 
FOR j=1 TO n
IF a(i,j)>max THEN max=a(i):x=i:y=j
NEXT
NEXT
PRINT max,x,y