Original

We shall say that an n-digit number is pandigital if it makes use of all the digits 1 to n exactly once. For example, 2143 is a 4-digit pandigital and is also prime.

What is the largest n-digit pandigital prime that exists?

和訳

n桁の数がPandigitalであるとは, 1からnまでの数を各桁に1つずつもつことである.
例えば2143は4桁のPandigital数であり, かつ素数である.

n桁のPandigitalな素数の中で最大の数を答えよ.

当てにならないソースコード(C#)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
using System;
using System.Collections.Generic;

namespace ProjectEuler {
    class Problem41 : Problem{
        public Problem41() {
            int answer = 0;
            bool isprime = false;
            for (int i = 9; i > 0 && !isprime; i--) {
                List<int> digits = new List<int>();
                for (int j = i; j > 0; j--) {
                    digits.Add(j);
                }
                List<int> pandigitals = new List<int>();
                Pandigital(0, digits, ref pandigitals);

                foreach (var n in pandigitals) {
                    int root = (int)Math.Sqrt(n);
                    isprime = true;
                    for (int k = 2; k <= root; k++) {
                        if (n % k == 0) {
                            isprime = false;
                            break;
                        }
                    }
                    if (isprime) {
                        answer = n;
                        break;
                    }
                }
            }
            Console.WriteLine("> " + answer);
        }

        void Pandigital(int cur, List<int> digits, ref List<int> nums) {
            if (digits.Count == 0) {
                nums.Add(cur);
                return;
            }
            for (int i = 0; i < digits.Count; i++) {
                List<int> ndigits = new List<int>(digits);
                int num = cur * 10 + digits[i];
                ndigits.RemoveAt(i);
                Pandigital(num, ndigits, ref nums);
            }
        }
    }
}


先にパンデジタル数のリストを作成し、その後、素数かどうかを調べています。