用VB有一组分数序列:2/1,3/2,5/3,8/5……求这个数列的前十项,二十项之及前三十项之和
来源:百度知道 编辑:UC知道 时间:2024/09/27 07:20:21
编程?????
Dim shu(29)
Private Sub Form_Click()
s = 2
t = 1
Sum = 0
For i = 1 To 30
shu(i - 1) = s / t
q = t
t = s
s = q + s
Print shu(i - 1) & " "
Sum = Sum + shu(i - 1)
If i Mod 10 = 0 Then
Print "前" & (i \ 10) * 10 & "的和为:" & Sum
End If
Next
End Sub
有一个分数序列如下,求出这个序列前20项的和。 VB
c语言 有一组分数序列:2/1+3/2+5/3+8/5+13/8求其前20项的和
用VB输出一组数
c编程(分数序列求和)
用C语言编写:有一个分数序列2/1,3/2,5/3,8/5,13/8,......求出这个数列前20项之和
联想i720 序列借口有什么用!
韩信点兵,4个人一组,剩余2(N)个人,7个人一组,剩2(N)个人,12个人一组,余2(N)个人,最少有多少
韩信点兵,4人一组剩余2个人,7人一组剩2个人,11人一组剩余8个人,问他手下最少有多少兵?
4个人一组 剩下2个人 , 7个人一组 剩下2个人, 12个人一组剩下10个人. 一共有多少人?
韩信点兵,4人一组,剩余2人,7人一组剩余5人,12人一组,剩余2人,问他手下最少有多少兵.