Help:用findmax函数求出数组中 最大元素 在数组中的下标
*用findmax函数求出数组中 最大元素 在数组中的下标set talk off
clear
dime a(10)
for i=1 to 10
a(i)=int(rand()*100+1)
endfor
for i=1 to 10
??a(i)
endfor
c=findmax(a)
?c
set talk on
cancel
function findmax (g)
k=0
max0=g(1)&&报错。找不到g.prg,明明是数组,咋报错程序文件呢?
for i=2 to 10
if max0<g(i)
max0=g(i)
k=i
endif
endfor
return k
endfunc