-2
(define affiche-gagnant
  (lambda (j1 j2 g1 g2)

(begin 

  (display "Le gagnant est : ")

   (cond ((> g1 g2) j1) 

         ((< g1 g2) j2)

         (else (begin (display "personne. ") (display j1) (display " et ") (display j2) (display " sont exaequos. ")))))))

当 j1 或 j2 赢得比赛时,它会说:

 Le gagnant est :

    We don't see who win the game :(
4

1 回答 1

3

我已经回答了这个问题。

(define affiche-gagnant
  (lambda (j1 j2 g1 g2)

(begin 

  (display "Le gagnant est : ")

   (cond ((> g1 g2) (display j1)) ; You're returning, not displaying

         ((< g1 g2) (display j2)) 

         (else (begin (display "personne. ") (display j1) (display " et ") (display j2) (display " sont exaequos. ")))))))
于 2010-12-14T12:37:04.753 回答