fork download
copy 
  1. (define (fib n)
  2.   (define (fibaux v l c) (if (= c n) v (fibaux (+ v l) v (+ c 1))))
  3.   (fibaux 0 1 0))
  4.  
  5. (write (fib (read)))
  6.  
Time limit exceeded #stdin #stdout -1s 221760KB
comments (?)
stdin
copy 
1000000
stdout
copy 
Standard output is empty
https://ideone.com/sc5wC
language:
Scheme (guile 2.2.4)
created:
15 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!