VB求助 求Sn a aa aaa aaaaaa aaa n個a

2021-07-01 01:15:20 字數 3309 閱讀 3794

1樓:匿名使用者

當i不等於n的時候在s字串最後加上一個「+」號,當輸出最後一個字串,比如22222時候i=5,n=5,這個時候不要再s最後加上「+」號

如果有這句,比如a=2,n=5時候輸出是這樣的:

當a=2時,n=5時,s=2+22+222+2222+22222如果沒有這句if i <> n then s = s + "+" 那麼輸出是這樣的:

當a=2時,n=5時,s=222222222222222或者沒有判斷語句,只有s=s + "+" 那麼輸出是這樣的:

當a=2時,n=5時,s=2+22+222+2222+22222+

2樓:匿名使用者

if i <> n then s = s + "+" 首先s是一個字元型變數 這局話的意思等於如果i不等於n為真的話 s在原先的前提上增加一個加號「+」 比如原先s=「3」完成後等於「3+」

作用因為他用了string關鍵字(這裡的string是關鍵字不是字元型變數)所以每次總能返回迴圈對應的字元數 然後再用判斷語句在後面增加一個「+」號

求sn=a+aa+aaa+aaaa+…+aa…aaa(n個a),其中a是通過滾動條獲得的一個1~9 10

3樓:暗夜聞子規

dim a as integer, n as integer, temp#, sum#, m as string

private sub form_click()

a = int(rnd * 9 + 1)

label1.caption = "a=" & a

hscroll1.value = a

clsprint vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf

print tab(49); a

sum = a

temp = a

m = "sum=" & a

for i = 2 to n

temp = temp * 10 + a

sum = sum + temp

m = m & "+" & temp

print tab(50 - i); temp

next i

print tab(40); "------------------"

print tab(50 - n); sum

print "                           "; m & "=" & sum

end sub

private sub form_load()

label1.caption = "a=0"

label2.caption = "n=0"

hscroll2.value = 5

hscroll1.value = 1

end sub

private sub hscroll1_change()

a = hscroll1.value

label1.caption = "a=" & a

clsprint vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf

print tab(49); a

sum = a

temp = a

m = "sum=" & a

for i = 2 to n

temp = temp * 10 + a

sum = sum + temp

m = m & "+" & temp

print tab(50 - i); temp

next i

print tab(40); "------------------"

print tab(50 - n); sum

print "                           "; m & "=" & sum

end sub

private sub hscroll2_change()

n = hscroll2.value

label2.caption = "n=" & n

clsprint vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf

print tab(49); a

sum = a

temp = a

m = "sum=" & a

for i = 2 to n

temp = temp * 10 + a

sum = sum + temp

m = m & "+" & temp

print tab(50 - i); temp

next i

print tab(40); "------------------"

print tab(50 - n); sum

print "                           "; m & "=" & sum

end sub

c語言題目求sn=a+aa+aaa+aaaa+.....+aaa...a(n個a)之值,其中a是一個數字,n表示a的位數!

4樓:四舍**入

可以參考下面的**:

#include

int main()

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

5樓:匿名使用者

#include

main()

int c(int a,int n)

else}

6樓:匿名使用者

int a, sn=a;

for(int i=2;i<=n;i++)

7樓:匿名使用者

#include

int main()

return 0;}

VB題目,求大佬,如圖,vb題目求大佬解答

private sub mand1 click 生成20個20 80之間隨機數,按每行5個數輸出到窗體 me.cls dim a 20 dim i as integer for i 0 to 19 randomize a i int rnd 80 20 1 20 if i 0 and i mod 5...

求VB畢業課程設計,VB程式設計

給分解決不了這種問題的。vb程式設計 80 我自能給親說一下思路,如圖所示,應該建立2個form,第一個用於成績顯示查詢,當然前提應該把成績的資料庫匯入進去,如果這是老師要求的作業,用access資料庫簡單編幾個資料就好了。當點選 生成圖表 按鈕時,form1隱藏,form2出現,座標軸事先用lin...

急求VB程式設計

private sub command1 click dim a 20 i for i 1 to 20 給陣列a 1 20 賦值 a i inputbox 請輸入一個整型數 用inputbox輸入整數 print a i if i mod 5 0 then print 5個數一行。轉行 next i...