早教吧作业答案频道 -->数学-->
急求；在VB.NET环境下编写程序,计算并输出下面数列前N（设N=50)项中的和.1*2,2*4,3*6,n*2n,.
题目详情
急求；在VB.NET环境下编写程序,计算并输出下面数列前N（设N=50)项中的和.1*2,2*4,3*6,n*2n,.
▼优质解答
答案和解析
Dim i As Integer
Dim sum As Long = 0
For i = 1 To 50
sum += i * 2 * i
Next
MsgBox(sum)
N=50时结果为85850；
上面是一个过程,你可以写成一个函数!
Dim sum As Long = 0
For i = 1 To 50
sum += i * 2 * i
Next
MsgBox(sum)
N=50时结果为85850；
上面是一个过程,你可以写成一个函数!
看了 急求；在VB.NET环境下编...的网友还看了以下：
求数列0,1,1,2,2,3,3,4,4.的前n项和S当n是奇数时.S=2*{[(n-1)/2]* 2020-04-09 …
f(x)=x的n次方,若f'(1)=-4,则n=?这题得意思是不是原函数过(1,-4)?如果要是看 2020-06-03 …
一道复变函数,求指教设n为自然数且Xn+Yn(n为下角标)=（1+i*根号3)^n;求证：Xn-1 2020-06-03 …
急数列{an}中,an+1=-an^2+2an,a1=t(t>0),且{an}是有界数列,求实数t 2020-06-23 …
求和4^n+3*4^n-1+3^2*4^n-2+……+3^n-1*4+3^n（n∈n*） 2020-07-09 …
已知数列{an}的前n项和为Sn，且3Sn=4an-4n+1-4（n∈N*），令bn＝an4n．（ 2020-07-28 …
在数列{an}中,a1=4/5,且数列{an+1-a1an}是首项为16/25,公比为4/5的等比 2020-07-30 …
设n为正整数,证明1+(1/2)C(n,1)+(1/3)C(n,2)+(1/4)C(n,3)+…+ 2020-07-31 …
一道数学不等式证明题若n为正整数时,证明：[10^(n—1)]*[(4/5)^(n^2十2n十1) 2020-08-01 …
数学归纳法,刚才有一点还没弄明白,这个式子1+4+9··+n^2=1/6n{n+1}{2n+1}n 2020-08-01 …