GH教學

GodHelp線上補習班、各類教學分享網站(程式設計、Flash遊戲教學、影音轉檔、動畫、繪圖、Go Home Schooling.....等等)

搜尋

ASP三角形排列問題

VBA老師出題要我做一出個如下的三角形
.............a
...........aaa
.........aaaaa
.......aaaaaaa
.....aaaaaaaaa
...aaaaaaaaaaa
.aaaaaaaaaaaaa
首先要先觀察排列規則
而且每列數量是相同13個
所以只要觀察出a的數量
可以看出a是以2為增量所以*2來計算
相對地.就以相同量減少
以維持整行13的數量

VBA語法
Private Sub Command1_Click()
n = 13
For k=1 To 7
Print String(n-(K-1)*2,".") & String(1+(K-1)*2, "a")
Next
End Sub

ASP語法
<%
n = 13
For k=1 To 7
Response.write String(n-(K-1)*2,".") & String(1+(K-1)*2, "a") & "<br>"
Next
%>

0 意見:

張貼留言

活動

給您專屬賀卡

好站

知識+名片

GH知識+

天氣

Sitetag台灣部落格列表

統計

Blog Look Score and Rank