AnthonyMikh/two_digits.hs

Created February 6, 2018 21:45

Star (0) You must be signed in to star a gist
Fork (0) You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/AnthonyMikh/d694ad13c738ce4dd3984db10a7e9517.js"></script>
Save AnthonyMikh/d694ad13c738ce4dd3984db10a7e9517 to your computer and use it in GitHub Desktop.

Download ZIP

Решение задачи №68 от UniLecs

Raw

two_digits.hs

	fibs = 1 : 1 : zipWith (+) fibs (tail fibs)

	fibs2 = map (*2) fibs

	solution n = fibs2 !! n

	main = print $ solution 8
	-- > 68

Author

AnthonyMikh commented Feb 7, 2018

Функция fibs возвращает бесконечный список чисел Фибоначчи. Функция fibs2 возвращает бесконечный список удвоенных чисел Фибоначчи. Оператор индексации !! возвращает n+1 элемент списка (т. к. индекс начинается с нуля).

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment