Pandigital prime: Difference between revisions
Content added Content deleted
imported>Grootson No edit summary |
imported>Grootson |
||
Line 541: | Line 541: | ||
=={{header|MATLAB}}== |
=={{header|MATLAB}}== |
||
'''including zero''' |
|||
<syntaxhighlight lang="matlab"> |
|||
primeNumbers = sum(perms(0:7).*repmat((10*ones(1,8)).^(8-1:-1:0), [factorial(8),1]),'c') |
|||
mprintf('The largest pandigital prime is %u.', max(primeNumbers(find(members(primeNumbers, primes(7.7e7))==1)))) |
|||
</syntaxhighlight> |
|||
'''without zero''' |
|||
<syntaxhighlight lang="matlab"> |
|||
primeNumbers = sum(perms(1:7).*repmat((10*ones(1,7)).^(7-1:-1:0), [factorial(7),1]),'c') |
|||
mprintf('The largest pandigital prime is %u', max(primeNumbers(find(members(primeNumbers, primes(7.7e6))==1)))) |
|||
</syntaxhighlight> |
|||
=={{header|Pascal}}== |
=={{header|Pascal}}== |
||
=={{header|Free Pascal}}== |
=={{header|Free Pascal}}== |