Skip to main content
Code Golf

Return to Answer

added 1 character in body
Source Link
Martin Ender
Martin Ender
  • 197.2k
  • 67
  • 447
  • 975

Scheme, 97 bytes

Scheme, 97 bytes

 (define(r n)(let s([n n][a 1][b 0])(if(= 0 n)(cons a b)(s(- n 1)(+(* a 3)(* b 5))(+ a(* b 3))))))

Scheme, 97 bytes

 (define(r n)(let s([n n][a 1][b 0])(if(= 0 n)(cons a b)(s(- n 1)(+(* a 3)(* b 5))(+ a(* b 3))))))

Scheme, 97 bytes

(define(r n)(let s([n n][a 1][b 0])(if(= 0 n)(cons a b)(s(- n 1)(+(* a 3)(* b 5))(+ a(* b 3))))))
Source Link
Penguino
Penguino
  • 239
  • 2
  • 7

Scheme, 97 bytes

 (define(r n)(let s([n n][a 1][b 0])(if(= 0 n)(cons a b)(s(- n 1)(+(* a 3)(* b 5))(+ a(* b 3))))))