このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1267796762/871
#  【 課題 】 
#  商品リストに登録されている商品名と個数を入力すると、商品名、単価、個数、合計金額を表示するプログラムを作成します。添付のソースファイルにコードを追加して、以下の実行結果になるようなプログラムを作成してください。 
#  ☆商品名と個数を入力すると、商品名、単価、個数、合計金額を表示する (個数が入力されない場合は1個とみなす) 
#  C:\kadai>java Shopping Orange 
#  商品:Orange 
#  単価:100円 個数:1個 合計:100円 
#   
#  C:\kadai> java Shopping Orange 3 
#  商品:Orange 
#  単価:100円 個数:3個 合計:300円 
#   
#  ☆ 商品が見つからなかった場合には、エラーメッセージを表示する 
#  C:\kadai>java Shopping Melon 3 
#  Melonは商品ではありません。 
#   
#  ☆ 引数の数が0または3つ以上の場合は、エラーメッセージを表示する 
#  C:\kadai>java Shopping Orange Apple Peach 
#  引数には商品名と個数を入力してください。 
#  【 形態 】1. Javaアプリケーション(main()で開始) 
#  【 GUI  】4. 制限なし 
#  【 Ver  】1.6.0_05  
#  【 補足 】 Shoppingクラスはmain()メソッドを持つ。 
#               実行時の引数には商品名と個数を入力する。 
#                 個数が入力されなかった場合は1とみなす。 
#               Fruitクラスのsearch()メソッドは、商品が存在するかどうかを検索する 
#                 メソッドで、商品が存在した場合は単価を戻す。商品が見つからなかった場合には-1を戻す。 
#               Fruitクラスのdisplay()メソッドは、商品名、単価、個数から合計金額を計算して表示するメソッドである。商品が登録されていない場合はメッセージを表示する 
#  ソース 
#  shopping   http://ime.nu/www.dotup.org/uploda/www.dotup.org1383033.java.html 
#  fruit      http://ime.nu/www.dotup.org/uploda/www.dotup.org1383034.java.html 
#  ../test/read.cgi/tech/1267796762/870さん その通りです。完全に丸投げになりますがよろしくお願い致します。 
# 
# 

'商品リストに登録されている商品名と個数を入力すると、商品名、単価、個数、合計金額を表示する' :-
        商品名と個数を入力すると(_商品名,_個数),
        商品名、単価、個数、合計金額を(_商品名,_単価,_個数,_合計金額),
        表示する(_商品名,_単価,_個数,_合計金額),!.
'商品リストに登録されている商品名と個数を入力すると、商品名、単価、個数、合計金額を表示する'.

商品名と個数を入力すると(_商品名,_個数) :-
        user_parameters([_商品名,_個数文字列]),
        atom_to_term(_個数文字列,_個数,_),!.

商品名、単価、個数、合計金額を(_商品名,_単価,_個数,_合計金額) :-
        商品名リスト(_商品名,_単価),
        _合計金額 is  truncate(_単価 * _個数 + 0.5),!.
商品名、単価、個数、合計金額を(_商品名,_,_,_) :-
        '商品が見つからなかった場合には、エラーメッセージを表示する'(_商品名),
        fail.

表示する(_商品名,_単価,_個数,_合計金額) :-
        write_formatted('商品:%t\n',[_商品名]),
        write_formatted('単価:%t円 個数:%t個 合計:%t円\n',[_単価,_個数,_合計金額]),!.

'商品が見つからなかった場合には、エラーメッセージを表示する'(_商品名) :-
        write_formatted('%tは商品ではありません。\n',[_商品名]).