このディレクトリの索引
#  @TakaoOzaki 分数の問題と言っていたのはこれです。\
#  “@utatakiyoshi: 友達がSkypeで
#  「0~9を1回ずつ使い,?????/?????=1/9となるように?を埋めよ」って
#  算数パズルを出してきたからC++でサクッと書いてドヤ顔してやった”
#  

'0~9を1回ずつ使い,?????/?????=1/9となるように?を埋めよ'(X/Y) :-
        検査用の型を用意する(Lx,Lz),
        between(1,11111,X),
        重複しない数(X,Lx,[],L1),
        Y is X * 9,
        重複しない数(Y,Lz,L1,L2).

検査用の型を用意する(Lx,Lz) :-
        length(Lx,5),
        length(Lz,10).

重複しない数(X,Lx,L1,L2) :-
        number_chars(X,L),
        append(L1,L,L2),
        sort(L2,Lx).