fork download
  1. ; your code goes here
  2. (define a 8)
  3. (display
  4. (if (= a 0) 0 ; if a = 0 then return 0
  5. (/ 1 a)) ; else return 1 / a
  6. )
  7.  
  8. (newline)
  9. (define a 1)
  10. (display
  11. (cond ((= a 0) 0) ; if a=0 then return 0
  12. ((= a 1) 1) ; elsif a=1 then return 1
  13. (else (/ 1 a))) ; else return 1/a
  14. )
Success #stdin #stdout 0.02s 10776KB
stdin
Standard input is empty
stdout
1/8
1