このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1291471791/523
#  [1] 授業単元:プログラミング 
#  [2] 問題文(含コード&リンク): 
#  http://ime.nu/www.dotup.org/uploda/www.dotup.org1299230.jpg.html 
#  

文字列に含まれている英字小文字の数を数える(_文字列,_英字小文字の数) :-
        count((sub_atom(_文字列,_,1,_,_文字),_文字 @>= 'a',_文字 @=< 'z'),_英字小文字の数).