% 商品データ: product(商品名, 価格, 評価, レビュー数)
product(item1, 3000, 4.8, 20).
product(item2, 1800, 4.2, 200).
product(item3, 5000, 4.9, 5).
product(item4, 2500, 4.5, 80).

% --- おすすめ判定のルール ---

% 「評価が4.5以上」かつ「レビュー数が50件以上」の商品を「おすすめ」とする
recommended(Item) :-
    product(Item, _, Rating, Reviews),
    Rating >= 4.5,
    Reviews >= 50.

% 「評価が4.8以上」という「超高評価」な商品もおすすめとする
recommended(Item) :-
    product(Item, _, Rating, _),
    Rating >= 4.8.:- set_prolog_flag(verbose,silent).
:- prompt(_, '').
:- use_module(library(readutil)).

main:-
	process,
	halt.

process:-
	/* your code goes here */
	true.% 商品データ: product(商品名, 価格, 評価, レビュー数)
product(item1, 3000, 4.8, 20).
product(item2, 1800, 4.2, 200).
product(item3, 5000, 4.9, 5).
product(item4, 2500, 4.5, 80).

% --- おすすめ判定のルール ---

% 「評価が4.5以上」かつ「レビュー数が50件以上」の商品を「おすすめ」とする
recommended(Item) :-
    product(Item, _, Rating, Reviews),
    Rating >= 4.5,
    Reviews >= 50.

% 「評価が4.8以上」という「超高評価」な商品もおすすめとする
recommended(Item) :-
    product(Item, _, Rating, _),
    Rating >= 4.8.

:- main.