您的位置：程序门 -> vb -> 基础类



一道程序题，恳求各位大侠帮忙！！！！！！！！！！！！！


[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]


一道程序题，恳求各位大侠帮忙！！！！！！！！！！！！！
发表于：2007-08-26 13:24:41 楼主
3.执行下面程序，单击命令按钮command1后，

 
option   explicit
dim   n   as   integer
private   sub   command1_click（)
        dim   i   as   integer,   j   as   integer
  for   i=3   to   1   step   -2
                n=fun（i,n)
                print   n
        next   i

      end   sub
private   function   fun   （a   as   integer,b   as   integer)   as   integer
        static   x   as   integer
        dim   sum   as   integer,i   as   integer
        x=x+n
        for   i   =1   to   a
                b=b+x+i
                n=n-i\2
                sum=sum+b
        next   i
        a=a+1
        fun=sum+a
end   function

问题1
static   x   as   integer这句话对x和下面的for循环有没有作用？？？？？？
问题2
  for   i=3   to   1   step   -2
                n=fun（i,n)
                print   n
        next   i
上面的这个循环对下面的for循环有没有什么限制???
问题3
对于第2个循环，我计算的结果如下，请问我错在那里。
x＝0
i=1
b=b+x+i=0＋0+1=1
n=n-i\2=0-0=0
sum=sum+b=0+1=1
i=2
b=b+x+i=1+0+2=3
n=n-i\2=0-1=-1
sum=sum+b=1+3=4
.......and   so   on
从i＝2这一步好像就错了，请大侠指出错误，帮忙？？？？？？？？？？



相关文章
其他资讯

快速检索
分类导航标签a

最新资讯
热门点击