.版本 2
.子程序 _按鈕1_被單擊
.局部變量 最大數, 整數型
.局部變量 結果, 整數型
最大數 = 到整數 (編輯框1.內容) ' 編輯框1裝的是最大累加值
.判斷開始 (最大數 % 2 = 1) ' 判斷最大累加數是不是奇數
結果 = 最大數 × (最大數 - 1) ÷ 2 + 最大數
.默認
結果 = (最大數 + 1) × 最大數 ÷ 2
.判斷結束
編輯框2.內容 = 到文本 (結果) ' 編輯框2輸出累加後結果