このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1311089619/663
#  [1]C言語単位認定課題  
#  [2] 
#  課題8-2.  配列に順番に入力した数字を代入するプログラムを作れ。 
#   
#  すなわち、例えば以下のようなものを作れ。 
#  1度目にinput_number()で入力した数を、numbers[0]に代入し、 
#  2度目にinput_number()で入力した数を、numbers[1]に代入し、 
#  … 
#  n 度目にinput_number()で入力した数を、numbers[n-1]に代入する。 
#   
#   
#  input_number()という関数は、自分で定義するように 
#  [3]Windows Vista・cygwin1.7・C言語  
#  [4]今夜まで 
#   
#  お願いします、 
# 

'ならびに順番に入力した数字を入力する' :-
        ならびの要素数を指定する(_要素数),
        length(L,_要素数),
        findall(N,(
                    append(_,[_|_],L),
                    get_integer(N)),
                L).

ならびの要素数を指定する(_要素数) :-
        write('要素数を入力してください : '),
        get_integer(_要素数),!.

get_integer(N) :-
        get_line(Line),
        整数入力診断(Line,N),!.
get_integer(N) :- get_integer(N).

整数入力診断(Line,N) :-
        atom_to_term(Line,N,_),
        integer(N),!.