新手求助，谢谢

maidou83

请问各位高手我下面的这个小程序哪里出错了啊
f:=proc(x::list)
local i,n;
n:=nops(x);
> for i from 1 to n do
> subs(x=x/x[1],x);
> od;
> end;
  > a:=[2,3,4,5];
                          a := [2, 3, 4, 5]
> f(a);
为什么算不出来呢，

ChaChing

请教这是什麽软件语法?

feiyuzhen

循环好像有问题

maidou83

上次贴错了应该是这样的
f:=proc(x::list)
local i,n;
n:=nops(x);
> for i from 1 to n do
> subs(x=x/x[1],x);
> od;
> end;
  > a:=[2,3,4,5];
                          a := [2, 3, 4, 5]
> f(a);

maidou83

x代表一个序列，比如是说是[2，3，4，5]，nops(x)代表序列中又多少个元素，就是4个啊，i从1到4，做变换subs(x=x/x[1],x),就是从第二个元素开始都去除以第一个元素，想变成[1,3/2,2,5/2]，不知道哪里错了，请指教，谢谢