Scheme Sound

<eval> (define piano (instrument 1))</eval>

(define (run n)

   (if (= n 0) 'fertig
     (begin
       (play piano (* n 10) 100) 
       (run(- n 1))
     )
   )

) (run 10);