Coprimes: Difference between revisions
Frink
ReeceGoding (talk | contribs) m (→{{header|R}}: Syntax highlighting.) |
(Frink) |
||
Line 666:
true
false
</pre>
=={{header|Frink}}==
<lang frink>pairs = [ [21,15],[17,23],[36,12],[18,29],[60,15] ]
for [a,b] = pairs
println["[$a, $b] are " + (gcd[a,b] == 1 ? "" : "not ") + "coprime"]</lang>
{{out}}
<pre>
[21, 15] are not coprime
[17, 23] are coprime
[36, 12] are not coprime
[18, 29] are coprime
[60, 15] are not coprime
</pre>
| |||