Числа Фибоначчи в J
Пример для версий
J602
В этом примере используется рекурсивное определение чисел Фибоначчи. Оператор @. — селектор, выбирающий 1, если аргумент функции меньше или равен 2, и рекурсивное определение в противном случае.
load 'printf'
fibr=: 1:`(-&2 + &fibr -&1) @.(2&<)"0
fstr=: '...' ,~ ,~^:4 '%d, '
fstr printf fibr 1+i.16
Комментарии
]]>blog comments powered by Disqus
]]>