2010年7月20日火曜日

Determine whether two positive integer numbers are coprime

;; P33 (*) Determine whether two positive integer numbers are coprime.
;; Two numbers are coprime if their greatest common divisor equals 1.
;; Example:
;; * (coprime 35 64)
;; T
#lang racket
(provide coprime?)
(define (coprime? a b)
(= 1 (gcd a b)))
view raw p33.ss hosted with ❤ by GitHub

0 件のコメント:

コメントを投稿