VB程式設計列印n層金字塔行楊輝三角形

基於上述內容，新增了空格，使其看起來更像金字塔。

private sub form_click()const n = 10

dim a(n, n) as integerdim i, j as integer

a(1, 1) = 1

a(2, 1) = 1

a(2, 2) = 1

for i = 3 to n

a(i, 1) = 1

a(i, i) = 1

for j = 2 to i - 1

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

next j, i

for i = 1 to n

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

for j = 1 to i - 1

print a(i, j);

next j

printnext i

end sub

private sub form_click()dim a() as long, n as long, i as long, j as long, x as long

n = val(

if n > 16 or n <= 0 thenmsgbox "數字不正確，重新輸入行數"

exit sub

end if

redim a(n, n)

for i = 1 to n

for j = 1 to i

if j = 1 or i = j thena(i, j) = 1

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

end if

next j

next i

for i = 1 to n

print spc(48 - 3 * i);

for j = 1 to i

print a(i, j);

x = len(cstr(a(i, j)))if x = 1 then print spc(3);

if x = 2 then print spc(2);

if x = 3 then print spc(1);

next j

printprint

next i

end sub

public class yanghui

elsenum[m][n]=num[m-1][n-1]+num[m-1][n];這是遞迴法，例如，3=1+2,3的坐標為3[3,1]=1[2,0]+2[2,1]; }

for(int i=0;i;每層的換行}}}

**：#include

#define n 10

void setdata(int(*s)[n],int n);

int i=0;

int j=0;

for(i=0;iarr[0]=1;

arr=1;

for(i=2;ifor(j=1;jarr[j]=arr[i-1][j-1]+arr[i-1][j];

for(i=0;ifor(j=0;j<(2*line-2*i);j++)

printf("");

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

printf("%4d",arr[j]);

printf("");

return 0;

方法 3：定義 CRT 安全無警告 1

#include

int main()

int i,j,n=0;

首先，定義二維陣列計數符號 i、j 並初始化楊輝三角形中的行數。

int a[100][100]=;

只有 2 個初始值，即 a[0][0]=1 和 a[0][1]=2，其餘陣列元素的初始值均為 0

可以自定義 2D 陣列的大小，但切記不要讓它大於整數陣列的大小。

while(n<1||n>100)

當輸入的值不正確時，自動初始化問題，重新輸入。

printf("請輸入要列印的楊輝三角形行數“：");

scanf("%d",&n);

for(i=1;ifor(j=1;j<=i;j++）迴圈借用的第二層 i 限制了每行的字元數。

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

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

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

printf("");

return 0;

對於乙個動態的二維陣列，兩個迴圈就足夠了，假設下標Wei ij，乙個數字等於他肩上兩個數字之和。