aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

A-M baby

Browse source
This commit is contained in:
Ingy döt Net 2013-04-10 21:29:02 -07:00
parent 764da6cbbb
commit db842d013d
19005 changed files with 197040 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

1
Task/Fibonacci-sequence/K/fibonacci-sequence-1.k Normal file
View file

@ -0,0 +1 @@
{:[x<3;1;_f[x-1]+_f[x-2]]}

1
Task/Fibonacci-sequence/K/fibonacci-sequence-2.k Normal file
View file

@ -0,0 +1 @@
{c::.();{v:c[a:`$$x];:[x<3;1;:[_n~v;c[a]:_f[x-1]+_f[x-2];v]]}x}

2
Task/Fibonacci-sequence/K/fibonacci-sequence-3.k Normal file
View file

@ -0,0 +1,2 @@
phi:(1+_sqrt(5))%2
{_((phi^x)-((1-phi)^x))%_sqrt[5]}

1
Task/Fibonacci-sequence/K/fibonacci-sequence-4.k Normal file
View file

@ -0,0 +1 @@
{(x(|+\)\1 1)[;1]}

1
Task/Fibonacci-sequence/K/fibonacci-sequence-5.k Normal file
View file

@ -0,0 +1 @@
{x{x,+/-2#x}/!2}