Số siêu nguyên tố là số nguyên tố mà khi bỏ một số tuỳ ý các chữ số bên phải của nó thì phần còn lại vẫn tạo thành một số nguyên tố. Ví dụ 7331 là một số siêu nguyên tố có 4 chữ số vì 733, 73, 7 cũng là các số nguyên tố. Nhiệm vụ của bạn là viết chương trình nhập dữ liệu vào là một số nguyên N (0< N <10) và đưa ra kết quả là một số siêu nguyên tố có N chữ số cùng số lượng của chúng. --- Yêu cầu: - Dùng file: SIEUNGTO - Dùng chương trình con

const fi='sieungto.inp';
      fo='sieungto.out';
var n:byte;
    a:longint;
function lt(n:byte): longint;
var kq,i:longint;
begin
        kq:=1;
        for i:=1 to n do kq:=kq*10;
        exit(kq);
end;
function checkprime(x:longint):boolean;
var i:longint;
begin
        if x<2 then exit(false) else
        for i:=2 to trunc(sqrt(x)) do if x mod i = 0 then exit(false);
        exit(true);
end;
function supper(y:longint):boolean;
begin
        if y=0 then supper:=true else
        supper:=checkprime(y) and supper(y div 10);
end;
begin
        assign(input,fi);
        reset(input);
        read(n);
        close(input);
        a:=lt(n);
        repeat
                inc(a);
        until supper(a);
        assign(output,fo);
        rewrite(output);
        write(a);
        close(output);
end.