You are not logged in.

Search results

Search results 1-1 of 1.

Thursday, November 4th 2004, 1:27pm

Author: kurt

Programmieren (Scheme) Hausübung 2

Source code 1 2 3 4 5 6 7 8 9 10 (define (collatz k) (if (even? k) (/ k 2) (+ 1 (* k 3)))) (define (collatz-length n) (define (collatz-length-iter k l) (if (= k 1) l (collatz-length-iter (collatz k) (+ l 1)) ) ) (collatz-length-iter n 1) ) Viel Vergnügen, Erfolg, Reichtum und Ansehen damit.