Least common multiple: Difference between revisions

Content added Content deleted
Line 348: Line 348:
Built-in function:
Built-in function:
<lang parigp>lcm</lang>
<lang parigp>lcm</lang>


=={{header|PHP}}==
{{trans|D}}
<lang php>echo lcm(12, 18) == 36;

function lcm($m, $n) {
if ($m == 0 || $n == 0) return 0;
$r = ($m * $n) / gcd($m, $n);
return abs($r);
}

function gcd($a, $b) {
while ($b != 0) {
$t = $b;
$b = $a % $b;
$a = $t;
}
return $a;
}</lang>


=={{header|PicoLisp}}==
=={{header|PicoLisp}}==