2009年2月17日 星期二

第一隻 Rebol 程式

[ Code ]

i: 0
loop 10 [ starstr: ""
for count 0 i 1 [ starstr: join starstr "*" ]
print starstr
i: i+1 ]

[ Result ]

*
**
***
****
*****
******
*******
********
*********
**********

沒有留言:

[Excel]如何創建自定義函數

在 Excel 內建函式中找不到自已想要的函式怎麼辦?事實上我們可以自已建一個,以下是一個簡單的Excel自定義函數示例,用於將民國年轉為西元: Function 民國轉西元(x As Double) As Double     民國轉西元 = x + 1911 End Func...