VB楊輝三角等腰10行,楊輝三角 等腰三角形 vb

2022-05-27 07:16:33 字數 6077 閱讀 7939

1樓:

先把form的autoredraw屬性改成true,**如下:

*************************=option explicit

dim a(10, 10) as longdim b(10) as string

dim i as byte

dim j as byte

private sub form_load()a(0, 0) = 1

for i = 1 to 10

for j = 1 to 10

a(i, j) = a(i - 1, j - 1) + a(i - 1, j)

if a(i, j) <> 0 then

b(j) = b(j - 1) & " " & a(i, j)end if

next

print b(i)

next

end sub

2樓:匿名使用者

private sub form_load()a(0, 0) = 1

for i = 1 to 20

for j = 1 to 20

a(i, j) = a(i - 1, j - 1) + a(i - 1, j)

if a(i, j) <> 0 then

b(j) = b(j - 1) & " " & a(i, j)end if

next j

label1.text&= b(i) & vbclrfnext i

end sub

vb程式設計,如何下面程式的楊輝三角成等腰三角形

3樓:四舍**入

輸入如下函式即可:

private sub command1_click()

dim i as integer, j as integer

dim n as integer

dim a() as integer

n = val(text1.text)

redim a(1 to n, 0 to n)

a(1, 1) = 1

for i = 2 to n

for j = 1 to n

a(i, j) = a(i - 1, j - 1) + a(i - 1, j)

next

next

for i = 1 to n

print spc(2 * (n - i));

for j = 1 to i

print format(a(i, j), "@@@@");

next

print

next

end sub

擴充套件資料:

vb數學函式

1、abs 函式

返回數字的絕對值。

abs(number) number 引數可以是任意有效的數值表示式。

如果number包含null,則返回null如果是未初始化變數,則返回 0。

數字的絕對值是其無符號的數值大小。例如,abs(-1)和abs(1) 都返回1。

2、atn函式返回數值的反正切值。

atn(number) number 引數可以是任意有效的數值表示式。

說明 atn 函式計算直角三角形兩個邊的比值 (number) 並返回對應角的弧度值。此比值是該角對邊的長度與鄰邊長度之比。結果的範圍是從 -pi/2 到 pi/2 弧度。

弧度變換為角度的方法是將弧度乘以 pi/180。

3、cos 函式 返回某個角的餘弦值。cos(number) number 引數可以是任何將某個角表示為弧度的有效數值表示式。

4樓:聽不清啊

已經修改完成:

private sub command1_click()dim i as integer, j as integerdim n as integer

dim a() as integer

n = val(text1.text)

redim a(1 to n, 0 to n)a(1, 1) = 1

for i = 2 to n

for j = 1 to n

a(i, j) = a(i - 1, j - 1) + a(i - 1, j)

next

next

for i = 1 to n

print spc(2 * (n - i));

for j = 1 to i

print format(a(i, j), "@@@@");

next

print

next

end sub

如何用vb程式設計輸出楊輝三角?

5樓:問明

vb**:

option base 1

private sub form_click()

const n=10

dim arr(n,n)as integer

for i=1 to n

arr(i,i)=1

arr(i,1)=1

next i

for i=3 to n

for j=2 to i-1

arr(i,j)=arr(i-1,j-1)+arr(i-1,j)

next j

next i

for i=1 to n

for j=1 to i

print arr(i,j);

next j

print

next i

end sub

輸出結果:

printf的格式

printf函式的原型為:

#include

int printf(const char*format,...);

在講每一個函式的時候都會先把它的函式原型寫出來,這個原型你們現在看不懂不要緊,等到學完c語言之後再來看這個原型就會發現它是很有參考意義的!它對深刻理解函式有著很大的價值。

printf的格式有四種:

1)printf("字串\n");

#include

int main(void)

printf("hello world!\n");//\n表示換行

return 0;

其中\n表示換行的意思。它是一個轉義字元,前面在講字元常量的時候見過。其中n是「new line」的縮寫,即「新的一行」。

此外需要注意的是,printf中的雙引號和後面的分號必須是在英文輸入法下。雙引號內的字串可以是英文,也可以是中文。

2)printf("輸出控制符",輸出引數);

#include

int main(void)

int i=10;

printf("%d\n",i);/*%d是輸出控制符,d表示十進位制,後面的i是輸出引數*/

return 0;

這句話的意思是將變數i以十進位制輸出。

i本身就是十進位制,程式中雖然寫的是i=10,但是在記憶體中並不是將10這個十進位制數存放進去,而是將10的二進位制**存放進去了。計算機只能執行二進位制0、1**,而0、1**本身並沒有什麼實際的含義,它可以表示任何型別的資料。

所以輸出的時候要強調是以哪種進位制形式輸出。所以就必須要有「輸出控制符」,以告訴作業系統應該怎樣解讀二進位制資料。

如果是%x就是以十六進位制的形式輸出,要是%o就是以八進位制的形式輸出。

3)printf("輸出控制符1輸出控制符2…",輸出引數1,輸出引數2,…);

#include

int main(void)

int i=10;

int j=3;

printf("%d%d\n",i,j);

return 0;

10 3

注意:10和3之間有一個空格;因為上面%d和%d之間有空格,printf中雙引號內除了輸出控制符和轉義字元\n外,所有其餘的普通字元全部都原樣輸出。比如:

#include

int main(void)

int i=10;

int j=3;

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

return 0;

i=10,j=3

i=、,、空格和j=全都原樣輸出了。此外需要注意的是:「輸出控制符」和「輸出引數」無論在「順序上」還是在「個數上」一定要一一對應。

4)printf("輸出控制符非輸出控制符",輸出引數);

6樓:匿名使用者

用一個動態二維陣列,兩重迴圈就可以,假設下標衛i j,一個數等於他的肩上的兩個數之和。

7樓:

楊輝三角 等腰三角形 vb

8樓:樂正炫

private sub form_click() const n = 10

dim i, j, a(n, n) as integer for i = 0 to n - 1 a(i, i) = 1 a(i, 0) = 1 next i

for i = 2 to n - 1

for j = 1 to i - 1

a(i, j) = a(i - 1, j - 1) + a(i - 1, j) next j next i

print "顯示楊輝三角" for i = 0 to n - 1 for j = 0 to i print a(i, j); next j print next i end sub

9樓:煙花坑

private sub text2_keypress(keyascii as integer)

dim a() as integer, i%, j%

if keyascii = 13 then

picture1.cls

n = val(text2.text)

text2.text = ""

redim a(n, n)

for i = 1 to n

picture1.print tab(25 - 2 * i);

for j = 1 to i

if i = j then

a(i, j) = 1

else

a(i, j) = a(i - 1, j - 1) + a(i - 1, j)

end if

picture1.print a(i, j);

next j

next i

end if

end sub

'************************************

把picture1.print tab(25 - 2 * i);放到第一個迴圈for i = 1 to n下面就ok啦!哈哈,給分吧!

vb程式設計:輸入整數n,分別按直角三角形和等腰三角行顯示n行楊輝三角

10樓:科新飛

暈死 我不懂楊輝三角

c語言程式設計輸出楊輝三角形(要求輸出10行)?

11樓:匿名使用者

#include

int main()

int n,i,j,a[100];

n=10;

printf("  1");

printf("\n");

a[1]=a[2]=1;

printf("%3d%3d\n",a[1],a[2]);

for(i=3;i<=n;i++)

a[1]=a[i]=1;

for(j=i-1;j>1;j--)

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

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

printf("%3d",a[j]);

printf("\n");

return 0;

彙編題目 接收整數n,顯示楊輝三角形

在影象顯示模式下畫出楊輝三角形?在楊輝三角形中,斜線l的上方,從1開始沿箭頭所示的陣列成一個鋸齒形的數列1,3,3 經過分析可知,奇數位的數值為 n 1 2,偶數位的數值為前兩個數之和,當然a2為已知1.a2 1,a4 a3 a2 2 1,a6 a5 a4 a5 a3 a2 3 2 1,an n n...

C語言楊輝三角問題問題,不使用陣列和堆疊,僅使用C程序設計(譚浩強版)前5章內容

include define n 5 long combi int n,int r int i long p 1 for i 1 i r i p p n i 1 i return p void paint int n,r for n 0 n n n for r 0 r n r int i 排版設定開...

鐵三角耳機,鐵三角耳機

wm5可以自行調整線的長度,也可以伸縮,創造屬於自己的風格。這就是這款耳機最大的賣點,wm5的訊號線採用了卷線設計機身內藏有滾輪裝置,方便連線線自由伸縮到適合長度,訊號線最長可伸至0.9米。wm5並沒有副送任何配件,耳機本來也是長線設計,因此不需要延長線。配件少也可以有效的節約了成本,使得鐵三角可以...