All pastes #904498 Raw Edit

Vermischtes

public text v1 · immutable
·published 2008-02-15 00:01 UTC
rendered paste body
(define (modulo n t)
  (let ((ergebnis (/ n t)))
    (if (eq? ergebnis (floor ergebnis)) #t #f)))
(display (modulo 14 5)) (newline)
(display (modulo 15 5)) (newline)