(import
  (scheme base)
  (scheme read)
  (scheme write)
)

(define yuki3008
  (let*
    (
      (n (read))
      (m (read))
    )
    (write (gcd n m))
    (display "\n")
  )
)