Ideone.com

fork download

copy

(define (task a b n)
	(if (> a b) '() (cons a (task (+ a n) b n))))
(display (task 1 11 3))

Success #stdin #stdout 0s 18080KB

stdin

copy

Standard input is empty

stdout

copy

(1 4 7 10)

https://ideone.com/EREzXP

language:

Scheme (chicken 4.13)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

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