查人人中国名人网进阶古代瑞兽有几个角:要用QBASIC变程打出图形
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/03 03:48:35
＊＊＊＊＊就是一个用＊作的倒三角，注意：第二行是比前一行缩进半格
* * * * 每个＊间没有空格喔
＊＊＊
* *
＊
0000000000(这些零是我空格打不出来加的不用管它)
＊＊＊＊＊
0＊＊＊＊
00＊＊＊
000＊＊
0000＊
* * * * 每个＊间没有空格喔
＊＊＊
* *
＊
0000000000(这些零是我空格打不出来加的不用管它)
＊＊＊＊＊
0＊＊＊＊
00＊＊＊
000＊＊
0000＊
实现的前提是你的那个“＊”一定要是全角字符
For i = 5 To 1 Step -1
For j = 0 To (5 - i)
Print " "; '半角空格
Next j
For j = 1 To i
Print "＊";'星号一定要是全角字符
Next j
Print '下一行
Next i