このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1342966104/238
#  [1] 授業単元:C言語プログラム 
#  [2] 問題文: 
#  http://ime.nu/codepad.org/yL0GUnrC 
#  
\\次のような家計簿データkakeibo.datがテキストでかかれてあり、中身を見ると
\\meat 125 1
\\rice 2000 1
\\juice 110 10
\\となっているものとする。このうち右端は商品名、真ん中は単価、左端は数量を表して
\\いる。このようなデータを読み取って使用金額の合計を計算するプログラミングを作り
\\たい。以下のプログラムをコンパイルがとおり、目的の動作をするように直接書き込み
\\なさい。(どこを補うべきかも考えること)ただし商品名は空欄を含まない文字列とする。
#  
#  #include
#  #include
#  
#  #define FILENAME "kakeibo.dat"
#  
#  int goukei(FILE *fp);
#  
#  
#  int main(){
#  FILE *fp;
#  
#  fp = fopen(FILENAME,"r");
#  if(fp==NULL){
#     fprintf(stderr,"%s is not found!\n",FILENAME);
#     exit(1);
#  }
#  
#     printf("goukei = %d\n",goukei(fp));
#  }
#  
#  int goukei(FILE *fp){
#      int sum =0, tanka, suryou,
#      char str[50];
#      while (fscanf()!=EOF){
#      }
#      return  ;
#  }

'次のような家計簿データkakeibo.datがテキストでかかれてあり、中身を見ると meat 125 1\\nrice 2000 1\\njuice 110 10\\n となっているものとする。このうち右端は商品名、真ん中は単価、左端は数量を表している。このようなデータを読み取って使用金額の合計を計算する'(_使用金額の合計) :-
        '家計簿データkakeibo.dat(各行の右端は商品名、真ん中は単価、左端は数量を表している)を読み取って使用金額の合計を計算する'(_使用金額の合計).

'家計簿データkakeibo.dat(各行の右端は商品名、真ん中は単価、左端は数量を表している)を読み取って使用金額の合計を計算する'(_使用金額の合計) :-        
        findsum(_使用金額,(
                    '家計簿データkakeibo.dat(各行の右端は商品名、真ん中は単価、左端は数量を表している)を読み取って使用金額の'(_使用金額)),
                _使用金額の合計).

'家計簿データkakeibo.dat(各行の右端は商品名、真ん中は単価、左端は数量を表している)を読み取って使用金額の'(_金額) :-
        get_split_lines('kakeibo.dat',[' ',','],LL),
        member([_品物,_単価,_数量],LL),
        _金額 is _単価 * _数量.