问题标题:
求VB大神编写关于fornext语言的程序1、求Fibonacci数列前30项,每行输出5个数。(Fibonacci数列第一项和第二项值都为1,从第三项开始,每项的值都是相邻前两项的和)。1123581321......2、
问题描述:
求VB大神编写关于fornext语言的程序
1、求Fibonacci数列前30项,每行输出5个数。(Fibonacci数列第一项和第二项值都为1,从第三项开始,每项的值都是相邻前两项的和)。
11235
81321......
2、编写程序,计算并输出下面数列前20项的和。要求结果保留2位小数。数列为:2/1,3/2,5/3,8/5,13/8,21/13……
3、编写程序,统计并逐行显示(每行5个数)在区间[10000,50000]上的回文数。(回文数的含义是从左向右读与从右向左读是相同的,及对称,如12321。)
4、用公式…进行计算,求前100项的和,精确到小数点后六位。
5、编写程序,计算并输出下面数列前n项的和(设n=20,x=0.5),要求结果保留3位小数。cos(x)/x,cos(2x)/2x,cos(3x)/3x,……,cos(n*x)/(n*x),……(其中,cos(x)为余弦函数)。
6、编写程序,计算并输出下列数列前20项的和。
(1-2-3),(4-5-6),(7-8-9),…………(注意,n=0,1,2,3…)
彭泽群回答:
dimiasInteger,nasInteger,RetasInteger
n=Val(InputBox("请输入n:"))
Ret=1
Fori=1ton
Ret=Ret*i
Nexti
PrintRet
点击显示
其它推荐