このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1320365280/625
#  [1] 授業単元:C言語 
#  [2] 問題文:123, 1.23, 1.2.3という数字を入力したとき、 
#         整数、小数、使用できない数字という分類に分けよ。 
#  

'123, 1.23, 1.2.3という数字を入力したとき、整数、小数、使用できない数字という分類に分けよ。' :-
        split('123, 1.23, 1.2.3',[',',' '],L),
        '整数、小数、使用できない数字という分類'(L).

'整数、小数、使用できない数字という分類'([]).
'整数、小数、使用できない数字という分類'([A|R]) :-
        \+(catch(atom_to_term(A,_,_),_,fail)),
        writef('%tは 使用できない数字 に分類されます\n',[A]),
        '整数、小数、使用できない数字という分類'(R).
'整数、小数、使用できない数字という分類'([A|R]) :-
        atom_to_term(A,X,_),
        integer(X),
        writef('%tは 整数 に分類されます\n',[A]),
        '整数、小数、使用できない数字という分類'(R).
'整数、小数、使用できない数字という分類'([A|R]) :-
        atom_to_term(A,X,_),
        float(X),
        writef('%tは 小数 に分類されます\n',[A]),
        '整数、小数、使用できない数字という分類'(R).