:- set_prolog_flag(verbose,silent).
:- prompt(_, '').
:- use_module(library(readutil)).

main:-
	process,
	halt.

process:-
% 商品データ
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以上、かつ価格が3000以下の商品を抽出する
recommended_product(Name, Price, Rating, Reviews) :-
    product(Name, Price, Rating, Reviews),
    Rating >= 4.5,
    Price =< 3000.	/* your code goes here */
	true.

:- main.