このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1308749241/295
#  [1] 授業単元:画像処理 
#  [2] 問題文(含コード&リンク):キーボードからx座標とy座標の組を順に読み込んで、その座標を連結した線形リストを形成するプログラムを作りなさい。 
#     改行のみ入力された場合には、入力を終了するようにする。 
#     入力された線形リストの先頭アドレスを引数として、その内容を表示する関数も合わせて作りなさい。 
#  

'キーボードからx座標とy座標の組を順に読み込んで、その座標を連結した線形リストを形成する'(_ならび) :-
        x座標とy座標をカンマ区切りで入力する(_x座標_y座標),
        連結した線形リストを形成する(_x座標_y座標,_ならび).

連結した線形リストを形成する([],[]) :- !.
連結した線形リストを形成する(L,[L|R]) :-
        x座標とy座標をカンマ区切りで入力する(_x座標_y座標),
        連結した線形リストを形成する(_x座標_y座標,R).

x座標とy座標をカンマ区切りで入力する(_x座標_y座標) :-
        write('x座標,y座標をカンマ区切りで入力してください : '),
        readln(_座標ならび).