eso/fibo.hai
2025-04-16 22:32:27 +02:00

56 lines
1.1 KiB
Text

HAI 1.2
HOW IZ I POWER YR NB AN YR N
I HAS A RES ITZ NB
IM IN YR LOOP
DIFFRINT N AN SMALLR OF N AN 1, O RLY?
YA RLY
N R DIFF OF N AN 1
RES R PRODUKT OF RES AN NB
NO WAI
FOUND YR RES
OIC
IM OUTTA YR LOOP
IF U SAY SO
HOW IZ I SQUARE YR NB
I HAS A RES ITZ 1.0
I HAS A ITE ITZ 0
IM IN YR LOOP
DIFFRINT ITE AN SMALLR OF ITE AN 9, O RLY?
YA RLY
FOUND YR RES
NO WAI
RES R QUOSHUNT OF SUM OF QUOSHUNT OF NB AN RES AN RES AN 2
ITE R SUM OF ITE AN 1
OIC
IM OUTTA YR LOOP
IF U SAY SO
HOW IZ I FIBO YR NB
I HAS A GOLDEN ITZ QUOSHUNT OF SUM OF I IZ SQUARE YR 5 MKAY AN 1 AN 2
I HAS A GOLDENPRIME ITZ QUOSHUNT OF DIFF OF I IZ SQUARE YR 5 MKAY AN 1 AN 2
I HAS A N ITZ 0.0
IM IN YR LOOP
DIFFRINT N AN SMALLR OF N AN NB, O RLY?
YA RLY
GTFO
NO WAI
VISIBLE PRODUKT OF QUOSHUNT OF 1 AN I IZ SQUARE YR 5 MKAY AN DIFF OF I IZ POWER YR GOLDEN AN YR N MKAY AN I IZ POWER YR GOLDENPRIME AN YR N MKAY
N R SUM OF N AN 1
OIC
IM OUTTA YR LOOP
IF U SAY SO
I IZ FIBO YR 15 MKAY
KTHXBYE