|
|
|
areaCircle(r)
|
|
q 3.1415926535898*r*r
|
|
|
|
factorialByRef(n)
|
|
i n=1 q
|
|
s k=1
|
|
f i=1:1:n d
|
|
. s k=k*i
|
|
s n=k
|
|
q
|
|
|
|
factorialByVal(n)
|
|
i n=1 q 1
|
|
s k=1
|
|
f i=1:1:n d
|
|
. s k=k*i
|
|
q k
|
|
|
|
fibonacci(n)
|
|
s f(1)=1,f(2)=1
|
|
f i=3:1:n d
|
|
. s f(i)=f(i-1)+f(i-2)
|
|
q f(n)
|
|
|
|
hello()
|
|
w "Hello!",!
|
|
q
|