【VB作业,求助.数组1、求Fibonacci序列1、1、2、3、5、8、13、.前50项的和.2、随机输入20个元素存放到数组,找出其中的最大值、最小值及它们的位置.DoLoop循环1、利用pi/4=1-1/3+1/5-1/7+…,求pi的值】

　　VB作业,求助.

　　数组

　　1、求Fibonacci序列1、1、2、3、5、8、13、.前50项的和.

　　2、随机输入20个元素存放到数组,找出其中的最大值、最小值及它们的位置.

　　DoLoop循环

　　1、利用pi/4=1-1/3+1/5-1/7+…,求pi的值,直到最后一项的值小于10^(-6)为止.

　　2、我国现有人口为14亿.设年增长率为1％,编写程序,计算多少年后增加到20亿.

　　多重循环

　　1、求阶乘和.s=1!+3!+5!+7!+...+55!将程序运行结果一并写上.

　　2、找出1--1000之间的完全数.如6=1+2+3,6即为完全数.

　　3、设计滚动条控件,用滚动条控件控制标签颜色的深浅.