TuH2 scheme

Aus ProgrammingWiki

Archivierte Version vom 2009-04-06T08:48:28+00:00. Aktuelle Version

Scheme Programmbeispiele

;zzls für ZufallsZahlenListe. Generiert eine Liste mit n paarweise verschiedenen Ganzen Zahlen zwischen a und b.
;Beispielaufruf: 
;>(zzls 10 100 1000) ; Zufallszahlenliste mit 1000 Zufallszahlen zwischen 10 und 100

(define zzls
  (lambda (a b n)
    (if (= n 0)
        (list)
        (let ((x (random b)))
          (if (> x a)
              (append (list x)(zzls a b (- n 1)))
              (zzls a b n))))))

TuH2 scheme

Scheme Programmbeispiele

Suche