Coprimes: Difference between revisions
Content added Content deleted
(add FreeBASIC) |
(add Fermat) |
||
| Line 440: | Line 440: | ||
{ 21 22 25 31 143 } Coprime |
{ 21 22 25 31 143 } Coprime |
||
</pre> |
</pre> |
||
=={{header|Fermat}}== |
|||
<lang fermat>Func Is_coprime(a, b) = if GCD(a,b)=1 then 1 else 0 fi.</lang> |
|||
=={{header|FreeBASIC}}== |
=={{header|FreeBASIC}}== |
||