Pandigital prime: Difference between revisions
added Arturo
(→{{header|ALGOL 68}}: Alternative version based on the Delphi version) |
Drkameleon (talk | contribs) (added Arturo) |
||
Line 161:
1..7: 7652413
</pre>
=={{header|Arturo}}==
<syntaxhighlight lang="arturo">allowed: @1..7
pandigital?: function [n][
allowed = sort unique digits n
]
largestPossiblePandigital: 7654321
until -> dec 'largestPossiblePandigital [
and? -> pandigital? largestPossiblePandigital
-> prime? largestPossiblePandigital
]
print "The largest pandigital prime is:"
print largestPossiblePandigital</syntaxhighlight>
{{out}}
<pre>The largest pandigital prime is:
7652413</pre>
=={{header|C#|CSharp}}==
| |||