このディレクトリの索引

# 出典 :: C/C++の宿題片付けます 130代目 #567 # すみません。 # # c言語がまだ初心者すぎてわからないのでどうかお願いします! # # ■プログラム1: # # りんごが30個中、腐っていたりんごが10個あったとき、 # 腐っていないりんごを3人で分けると、 # 一人当たりのりんごの個数は何個になるか、計算し、 # "一人あたりのりんごの個数"と"残ったりんごの個数"を # 出力するプログラム。 # 'りんごが30個中、腐っていたりんごが10個あったとき、 腐っていないりんごを3人で分けると、 一人当たりのりんごの個数は何個になるか、計算し、 "一人あたりのりんごの個数"と"残ったりんごの個数"を 出力する' :- 'りんご30個の中、腐っていたりんごが10個あったとき'(_りんご30個,_腐っていたりんご10個), '腐っていないりんごを3人で分けると、一人当たりのりんごの個数は何個になるか、計算し、'(_りんご30個,_腐っていたりんご10個,_腐っていないりんご,_一人あたりのりんごの個数,_残ったりんごの個数), '"一人あたりのりんごの個数"と"残ったりんごの個数"を出力する'(_一人あたりのりんごの個数,_残ったりんごの個数). 'りんご30個の中、腐っていたりんごが10個あったとき'(_りんご30個,_腐っていたりんご10個) :- 'りんご30個の中、'(_りんご30個), '腐っていたりんごが10個あったとき'(_腐っていたりんご10個). 'りんご30個の中、'(_りんご30個) :- length(_りんご30個,30). '腐っていたりんごが10個あったとき'(_腐っていたりんご10個) :- length(_腐っていたりんご10個,10). '腐っていないりんごを3人で分けると、一人当たりのりんごの個数は何個になるか、計算し、'(_りんご30個,_腐っていたりんご10個,_腐っていないりんご,_一人あたりのりんごの個数,_残ったりんごの個数) :- 腐っていないりんごを(_りんご30個,_腐っていたりんご10個,_腐っていないりんご), 一人あたりのりんごの個数(_腐っていないりんご,_腐っていないりんごの個数,_一人あたりのりんごの個数), 残ったりんごの個数は腐っていないりんごの余りと腐っていたりんご10個の合計(_腐っていないりんごの個数,_残ったりんごの個数). 腐っていないりんごを(_りんご30個,_腐っていたりんご10個,_腐っていないりんご) :- append(_腐っていたりんご10個,_腐っていないりんご,_りんご30個). 一人あたりのりんごの個数(_腐っていないりんご,_腐っていないりんごの個数,_一人あたりのりんごの個数) :- length(_腐っていないりんご,_腐っていないりんごの個数), _一人あたりのりんごの個数 is _腐っていないりんごの個数 // 3. 残ったりんごの個数は腐っていないりんごの余りと腐っていたりんご10個の合計(_腐っていないりんごの個数,_残ったりんごの個数) :- _腐っていないりんごの余り is _腐っていないりんごの個数 mod 3, _残ったりんごの個数 is _腐っていないりんごの余り + 10. '"一人あたりのりんごの個数"と"残ったりんごの個数"を出力する'(_一人あたりのりんごの個数,_残ったりんごの個数) :- writef('一人あたりのりんごの個数 :: %w\n残ったりんごの個数 :: %w\n',[_一人あたりのりんごの個数,_残ったりんごの個数]).