如何用VB编程输出杨辉三角?

当n=10时,共11行... 当n=10时,共11行 展开
 我来答
问明6E
高粉答主

2019-05-22 · 每个回答都超有意思的
知道答主
回答量:279
采纳率:100%
帮助的人:12.8万
展开全部

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<stdio.h>

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

在讲每一个函数的时候都会先把它的函数原型写出来,这个原型你们现在看不懂不要紧,等到学完C语言之后再来看这个原型就会发现它是很有参考意义的!它对深刻理解函数有着很大的价值。

printf的格式有四种:

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

#include<stdio.h>

int main(void)

{

printf("Hello World!\n");//\n表示换行

return 0;

}

其中\n表示换行的意思。它是一个转义字符,前面在讲字符常量的时候见过。其中n是“new line”的缩写,即“新的一行”。

此外需要注意的是,printf中的双引号和后面的分号必须是在英文输入法下。双引号内的字符串可以是英文,也可以是中文。

2)printf("输出控制符",输出参数);

#include<stdio.h>

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<stdio.h>

int main(void)

{

int i=10;

int j=3;

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

return 0;

}

输出控制符1对应的是输出参数1,输出控制符2对应的是输出参数2……编译、链接、执行后看一下输出结果:

10 3

注意:10和3之间有一个空格;因为上面%d和%d之间有空格,printf中双引号内除了输出控制符和转义字符\n外,所有其余的普通字符全部都原样输出。比如:

#include<stdio.h>

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("输出控制符非输出控制符",输出参数);

听不清啊
高粉答主

推荐于2017-09-01 · 说的都是干货,快来关注
知道顶级答主
回答量:7.8万
采纳率:89%
帮助的人:1.9亿
展开全部

Private Sub Command1_Click()

  Dim a(20) As Integer

  a(1) = 1

  n = CInt(InputBox("请输入要几层的三角?"))

  Print Tab(2 * n + 1); Format(a(1), "@@@@")

  For i = 1 To n

    Print Tab(2 * (n - i) + 1);

    For j = i + 1 To 1 Step -1

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

      Print Format(a(j), "@@@@");

    Next j

    Print

  Next i

End Sub

已赞过 已踩过<
你对这个回答的评价是?
评论 收起
751hjl
2011-05-16
知道答主
回答量:20
采纳率:0%
帮助的人:0
展开全部
用一个动态二维数组,两重循环就可以,假设下标卫i j,一个数等于他的肩上的两个数之和。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友bdb9803
2011-05-12 · TA获得超过1.1万个赞
知道大有可为答主
回答量:1.1万
采纳率:53%
帮助的人:1亿
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
欧阳峰800
2014-12-04
知道答主
回答量:1
采纳率:0%
帮助的人:1302
展开全部
不会,,,
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式