{"author_url":"https://blog.hatena.ne.jp/mzp/","url":"https://mzp.hatenadiary.org/entry/20100706/lcm","blog_url":"https://mzp.hatenadiary.org/","title":"\u6700\u5c0f\u516c\u500d\u6570","description":"30\u5206\u30d7\u30ed\u30b0\u30e9\u30e0\u3001\u305d\u306e780\u3002 \u6700\u5c0f\u516c\u500d\u6570\u3092\u6c42\u3081\u3066\u307f\u307e\u3057\u305f\u3002 \u4f7f\u3044\u65b9 gosh> (lcm 3 2) 6 gosh> (lcm 21 6) 42 \u30bd\u30fc\u30b9\u30b3\u30fc\u30c9 #! /opt/local/bin/gosh ;; -*- mode:scheme; coding:utf-8 -*- (define (gcd x y) (if (= y 0) x (gcd y (modulo x y)))) (define (lcm x y) (/ (abs (* x y)) (gcd x y))) \u53c2\u8003 \u904e\u53bb\u306e30\u5206\u30d7\u30ed\u30b0\u30e9\u30e0 Least common multiple - Wikipedia","version":"1.0","author_name":"mzp","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmzp.hatenadiary.org%2Fentry%2F20100706%2Flcm\" title=\"\u6700\u5c0f\u516c\u500d\u6570 - \u307f\u305a\u3074\u30fc\u65e5\u8a18\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","published":"2010-07-06 00:00:00","provider_url":"https://hatena.blog","type":"rich","blog_title":"\u307f\u305a\u3074\u30fc\u65e5\u8a18","image_url":null,"width":"100%","provider_name":"Hatena Blog","categories":["Scheme","30\u5206\u30d7\u30ed\u30b0\u30e9\u30e0"],"height":"190"}