已知函数sum(k,n)=1^k+2^k+3^k…+n^k.计算当k=2,n=5时的结果.
Private Function Power(a As Integer,b As Integer) As Long
Dim i As Integer,t As Long
t = 1
For i = 1 To a
#####[1]##### '第1空
Next i
#####[2]##### '第2空
End Function
Private Function Sum(k As Integer,n As Integer) As Long
Dim i As Integer,s As Integer
For i = 1 To n
s = s + Power(#####[3]##### ) '第3空
Next i
Sum = s
End Function
Private Sub Form_Click()
Dim k As Integer,n As Integer,s As Long
k = 2
n = 5
s=#####[4]##### '第4空
Print s
End Sub
人气:183 ℃ 时间:2019-10-17 08:15:39
解答
第1空:
t = t * b
第2空:
Power = t
第3空:
k,i
第4空:
Sum(k,n)
推荐
- 已知sum(k,n)=1^K+2^k+……+n^k,用函数sum给出定义函数的值
- 2.下面程序用于求,其中n,k从键盘输入,函数power(n,m)用于求,函数sum_power(k,n)用于求f(n,k).请完成
- 用VBA编写一个公共的函数Sum(n)=1 + 1/2!+ 1/3!+ 1/4!+ … + 1/n!,n为整型,函数返回值为双精度型.
- 为什么用函数公式=SUM计算0.5 1 1 1 1 1 1这六个数值结果为3
- 郭沫若写《天上的街市》写作背景是什么?
- 用下面的词语组成一个陈述句,再写出与它意思相同的两个句子.
- 成数,折数的意义,含义是什么?
- 氢气和氧气反应生成水为什么不是离子反应
猜你喜欢
- 小东看叔叔锯木头,锯一次木头要2分钟,叔叔把木头锯成5段,叔叔请小东算一算需要几分钟?
- 一辆汽车从A地开往B地,前3小时行了180千米,照这样的速度,还要1.5小时才能到达,AB两地相距多远?
- 你让我感到害怕,英语怎么说?
- 某同学做了一次较为精确的测定匀加速直线运动的加速度的实验,实验所得到的纸带如图所示,设0点是计数的起始点,两计数点之间的时间间隔为0.1s,则第一个计数点与0点的距离s1应为__________cm,物体的加速度________
- “我”上学了,还是不断收到姥姥寄来的剪纸,其中表达姥姥对‘我’的期待的一副剪纸是这样的
- 三七五折等于几成
- 小红计算两个数的加法时,把其中一个加数个位上的0漏掉了,结果算出的和是37,已知正确答案是91,那么这
- 如图所示的是闭合电路的一部分导体在两磁极间的运动情形.图中小圆圈代表导体的横截面,a、b、c、d表示运动中四个不同位置.图中箭头表示在那个位置上的运动方向.导体在_位置会产