欢迎您访问高一信息编程加工6-5的答案!

高一信息编程加工6-5的答案

更新时间:2021-07-23 11:43:58作者:admin2

Public Function Diamond(ByVal num As Integer) As String        Dim i, j As Integer, st As String =         If (num Mod 2 = 0) Then            Return         End If        '输出上三角形        For i = 1 To (num + 1) \ 2            For j = 1 To (num + 1) / 2 - i                st = st &              Next            For j = 1 To 2 * i - 1                st = st & *            Next            st = st & vbCrLf        Next        '输出下三角形        For i = 1 To (num - 1) \ 2            For j = 1 To i                st = st &              Next            For j = 1 To num - 2 * i                st = st & *            Next            st = st & vbCrLf        Next        Return st    End Function    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click        Dim str As String =         str = Diamond(7)        TextBox6.Text = str    End Sub

我看不倒问题哎。

为您推荐

江苏高考如何填报志愿

首先,要参考院校资料,招生章程、招生计划等; 其次,查询有关院校、专业各批录取分数和录取考生的位次情况; 然后,了解今年在本省市招生的学校、专业、人数; 最后,用自己的平时成绩、

2021-06-29 06:36

高考志愿如何填?

高考过后,紧接着高考志愿填报是广大考生及家长头痛的事情,高考志愿填报不仅仅是张志愿表,而是关系着考生未来职业规划和未来人生的走向。在志愿填报时,很多的家长和考生都会搜集

2021-06-29 06:23

黑龙江省高考志愿填报方法

在高考前会有一本招生专业手册,考试结束一阵会有一本各专业录取分数线手册,对照着近三年分数和自己的估分选择志愿。在黑龙江招生信息港进行志愿填报,具体时间高考后在网站上会

2021-06-27 13:47

成都学院怎么样

校园环境美,因为学校是新修没几年的,所以环境好,个人觉得很适合耍朋友。教学质量方面,和其他二本院校确实就没法比了,如果想学东西,那还是选择其他学校吧。不过近几年成都学院收分

2021-06-26 09:12

我要做警察.!怎样可以报考广东警官学院.?

报考条件及要求  各专业报考条件遵照《教育部关于做好2010年普通高等学校招生工作的通知》的要求;报考提前第二批本科(公安类专业)的广东考生须参加我校统一组织的面试、政

2021-06-23 11:45

2021最新高考资料提示

2021最新高考资料提示

2021-04-22 11:51

加载中...