Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
4
Task/Fibonacci-sequence/Lingo/fibonacci-sequence-1.lingo
Normal file
4
Task/Fibonacci-sequence/Lingo/fibonacci-sequence-1.lingo
Normal file
|
|
@ -0,0 +1,4 @@
|
|||
on fib (n)
|
||||
if n<2 then return n
|
||||
return fib(n-1)+fib(n-2)
|
||||
end
|
||||
11
Task/Fibonacci-sequence/Lingo/fibonacci-sequence-2.lingo
Normal file
11
Task/Fibonacci-sequence/Lingo/fibonacci-sequence-2.lingo
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
on fib (n)
|
||||
if n<2 then return n
|
||||
fibPrev = 0
|
||||
fib = 1
|
||||
repeat with i = 2 to n
|
||||
tmp = fib
|
||||
fib = fib + fibPrev
|
||||
fibPrev = tmp
|
||||
end repeat
|
||||
return fib
|
||||
end
|
||||
6
Task/Fibonacci-sequence/Lingo/fibonacci-sequence-3.lingo
Normal file
6
Task/Fibonacci-sequence/Lingo/fibonacci-sequence-3.lingo
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
on fib (n)
|
||||
sqrt5 = sqrt(5.0)
|
||||
p = (1+sqrt5)/2
|
||||
q = 1 - p
|
||||
return integer((power(p,n)-power(q,n))/sqrt5)
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue