このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1337692704/440
#  「課題」 
#  以下に示すのは、int型配列aの要素の中で値が正であるものを順に並べた要素 
#  をもつ配列bを作るプログラムである(配列aが{5,-1,3,4,-2,7}であれば、配列bは{5,4 
#  ,3,7}となる)  
#  int count =0; 
#  for (int i=0;i<a.length; i++) 
#  if (a[i]>0) count++ 
#  int[] b =new int[count]; 
#  int j =0; 
#  for (int i=0; i<a.length;i++) 
#  if(a[i]>0)b[j++]=a[i]; 
#   
#  これを実行できるようにする宿題です。 
#  明日の朝までに提出です。 
# 
# 

'整数のならびaの要素の中で値が正であるものを順に並べた要素をもつならびbを作る'(_a,_b) :-
        findall(A,(
                    member(A,_a),
                    A >= 0),
                _b).