Racket/Gissanumret: Skillnad mellan sidversioner

Från Täpp-Anders
Hoppa till navigeringHoppa till sök
Ingen redigeringssammanfattning
Ingen redigeringssammanfattning
 
Rad 9: Rad 9:


(displayln "Gissa ett tal från 1 till och med 100.")
(displayln "Gissa ett tal från 1 till och med 100.")
(nummerfråga (random 1 101))
(nummerfråga (random 1 100))


</pre>
</pre>

Nuvarande version från 8 juli 2026 kl. 13.31

#lang racket

(define (nummerfråga tal)
  (display "Din gissning? ")
  (define guess (string->number (read-line)))
  (cond [(> tal guess) (displayln "För lågt!") (nummerfråga tal)]
        [(< tal guess) (displayln "För högt!") (nummerfråga tal)]
        [else (displayln "Korrekt!")]))

(displayln "Gissa ett tal från 1 till och med 100.")
(nummerfråga (random 1 100))