RosettaCodeData/Task/Fibonacci-sequence/BASIC/fibonacci-sequence-7.basic
2017-09-25 22:28:19 +02:00

2 lines
57 B
Text

10 INPUT N
20 PRINT INT (0.5+(((SQR 5+1)/2)**N)/SQR 5)