このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1289913298/280
#  1] 授業単元: プログラミング  
#  [2] 問題文  
#  #include <stdio.h>  
#  #include <string.h> /*strlenのため */  
#   
#  void  
#  main( void )  
#  {  
#  char mojis[16]; /* 文字列を入れるための配列 */  
#  int i;  
#  int n; /* 'e'の数 */  
#   
#  printf("文字列:");  
#  scanf("%15s", mojis );  
#  mojis[15] = '\0';  
#   
#   
#  for( i=0, n=0; mojis[i]; i++ ) /* ヌル字まで順に見ていく */  
#  {  
#  if( mojis[i] == 'e' ) /* 文字と文字定数との比較 */  
#  {  
#  n++;  
#  }  
#  }  
#  printf( "文字数 %d のうち'e'は %d個", strlen(mojis ), n );  
#  return; }  
#  このプログラミングを改造  
#  1.strlenを使わずに文字数をカウントする。  
#  

特定文字が文字列の中に出現する度数を調べる(_特定文字,_文字列,_出現度数) :-
        count(sub_atom(_文字列,_,1,_,_特定文字),_出現度数).