> s := proc (x, y) local i, x0, y0, f, fm; option remember; x0 := 0; y0 := 0; fm := 0; f := proc (k) options operator, arrow; 0 end proc; for i from 0 to x+y do if 0 <= fm and 0 <= x and 0 <= y then x0 := x0+1, fm := fm-y, f := f+ii(k-x0) elif 0 <= fm and 0 <= x and y < 0 then x0 := x0+1, fm := fm-y, f := f+ii(k-x0) elif 0 <= fm and x < 0 and 0 <= y then x0 := x0-1, fm := fm-y, f := f+ii(k-x0) elif 0 <= fm and x < 0 and y < 0 then x0 := x0-1, fm := fm-y, f := f+ii(k-x0) elif fm < 0 and 0 <= x and 0 <= y then y0 := y0+1, fm := fm+x, f := f+ii(k-y0) elif fm < 0 and 0 <= x and y < 0 then y0 := y0-1, fm := fm+x, f := f+ii(k-y0) elif fm < 0 and x < 0 and 0 <= y then y0 := y0+1, fm := fm+x, f := f+ii(k-y0) else y0 := y0-1, fm := fm+x end if end do; return f end proc; ; D% V5 J5 h* V( \3 ^* t- D" n3 s%;6 \2 Y* {0 \4 k) H
Error, `:=` unexpected ; k% w9 A/ a, y- R) @4 V8 D/ h请问哪里有错啊,刚学这个软件,还不太熟。 & ^& t# V% C; r6 q+ j+ r! k9 a