用Visual Basic程式求S 1 (

2021-08-31 22:15:09 字數 4258 閱讀 1127

1樓:匿名使用者

private sub form_load()'s=1+(1+2)+(1+2+3)+(1+2+3+4)+···(1+2+3+···+n

dim i as integer

dim s as double

dim n as integer

dim a as integer

n = 10

s = 0

text1.text = " i s a" + chr(13) + chr(10)

for i = 1 to n

s = s + i

a = a + s

text1.text = text1.text + " " + cstr(i) + " " + cstr(s) + " " + cstr(a) + chr(13) + chr(10)

next i

end sub

2樓:

這個很簡單的,我把它加在了窗體的click事件裡了,你看下,已經測試過了,結果是正確的。希望對你有用。

private sub form_click()n = val(inputbox("請輸入項數n", "輸入"))s = 0: p = 0

for i = 1 to n

p = p + i

s = s + p

next i

print s

end sub

寫c++程式求和s=1+(1+2)+(1+2+3)+(1+2+3+4)+.....(1+2+3

3樓:匿名使用者

給你看看我複寫的:

#include

using namespace std;

int sum(int);

void main()

4樓:匿名使用者

第一個bai錯誤:

sum剛開始沒有賦值du,出來的zhi就是隨機的,所以應dao該定義sum=0;

第二個錯誤:

a[i]=a[i-1]+i;

這裡迴應該是a[i]=a[i-1]+i+1;

第三個答錯誤就是你的sum是從a[2]開始計算的所以前面的a[0],a[1]沒有算進去;

改寫的程式為:

#include

const int n=10;

void main()

cout<<"sum="<

5樓:匿名使用者

弟兄們,用雙層for迴圈還叫演算法嗎?我給你們看個雙層遞迴的,哈哈專哈,程式如下屬,親測可用

#include

using namespace std;

unsigned int add(int n);

unsigned int sumf(int n);

int main()}

用c語言編寫程式,計算s=1+(1+2)+(1+2+3)+…+(1+2+3+…+n)

6樓:會飛的小兔子

#include

usingnamespacestd;

intmain()

}cout<<"結果2為:"

return0;

擴充套件資料

c語言計算1-1/3+1/5-……的前n項之和#include

intmain(void)

printf("1+1/3-1/5+...+1/n=%.2f\n",s);

system("pause");

return0;}

7樓:匿名使用者

思路:先定義一個函式fun(n)用來計算

1到n的和,接著for迴圈計算1到n的fun(n)和就是s的值。

參考**:

#include

int fun(int n)

int main()/*3

s=10*/

8樓:匿名使用者

// 有需要問程式設計 相關問題的可以聯絡我

#include

int main()

printf("s = %d\n", sum);

return 0;}

9樓:滄海雄風

#include

int main()

}printf("sum[%d]\n",sum);

return 0;}3

sum[10]

press any key to continue

10樓:匿名使用者

運用了兩次小遞迴,s用來求(1+2+3...+n) sum用來求1+(1+2)+(1+2+3)+…+(1+2+3+…+n)

#include

using namespace std;

int s(int n)

int sum(int n)

int main()

11樓:匿名使用者

#include

int main()

printf("%lld",s);

return 0;

}望採納,謝謝

12樓:匿名使用者

#include

int main()

while(s>2000)

printf("n=%d,s=%d",n,s);}

13樓:路人

#include

int sum(int n)

return m;

}int main()

printf("%d",s);

return 0;}

14樓:thebestway之歌

#include

#include

int main()

提取公因式並通分之後可得最簡式 n*(n+1)*(n+2)/6。

用vb設計一個求s=1+(1+2)+(1+2+3)+(1+2+3+4)+...+(1+2+3+4+...+n)的程式

15樓:匿名使用者

dim s,s1,i,j,n as longn=clng(text1)

s=0for i=1 to n

s1=0

for j= 1 to i

s1=s1+j

next j

s=s+s1

next i

text2=s

如何用c語言程式設計 求1+(1+2)+(1+2+3)+(1+2+3+4)……+(1+2+3+……+n

16樓:匿名使用者

#include

int main()

{ int i,n,m=0,s=0;

printf("please input the number:\n");

scanf("%d",&n);

printf("n=%d\n",n);

for(i=1;i

程式設計計算s=1+(1+2)+(1+2+3)+...(1+2+3+4+...+100)的值

17樓:匿名使用者

vb6.0源程式如下:

private sub form_click()dim i as integer, s as long, sum as long

for i=1 to 100

s=s+i

sum=sum+s

next

print sum

end sub

18樓:匿名使用者

以下是主程式,請參考

int a[101],b[101],i,s=0;

for(i=1;i<101;i++)

a[i]=i;

for(i=1;i<101;i++)

用c語言編寫程式,求s=1+(1+2)+(1+2+3)+(1+2+3+4)+(1+2+3+4+…n)。 20

19樓:匿名使用者

staticvoidmain(stringargs)console.writeline("結果回

是答:",sum);console.readkey();}

編寫程式,求10用c語言,編寫程式,求10用C語言

include 主函式 main s是字元指標抄 陣列。對應4個字串襲。迴圈中bai i 3 2 1 0 對於不同的i,j有不同取值du 3 第一zhi次判斷就不成立,直接退出dao。不做操作 2 j 3 1 j 3 2 0 j 3 2 1 輸出的是s i j 也就是 從s i 字串的第j個字元開始...

急求用VB編小程式,急求用VB編一個小程式

簡單的,用text控制元件的sel屬性,dim n as long,num as longprivate sub command1 click l len text2 n instr n,text2,text1 text2.setfocus if n l and n 0 thentext2.sels...

求一個VB程式,求用VB解答

資料要儲存嗎?是不是只對你本次輸入的資料處理。開啟vbf 點選檔案 新建 表 表名 學生統計介面 儲存。彈出視窗 點現在輸入 在 欄位名 排名 型別 字元型 寬度 1即可 剩下的不管 輸下一行。欄位名 及格 型別 邏輯型 寬度 不管同理 下行。最後點確定 輸入資料 儲存。搞定 求用vb解答 製作這個...