:- 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.

Oi0gc2V0X3Byb2xvZ19mbGFnKHZlcmJvc2Usc2lsZW50KS4KOi0gcHJvbXB0KF8sICcnKS4KOi0gdXNlX21vZHVsZShsaWJyYXJ5KHJlYWR1dGlsKSkuCgptYWluOi0KCXByb2Nlc3MsCgloYWx0LgoKcHJvY2VzczotCiUg5ZWG5ZOB44OH44O844K/CnByb2R1Y3QoaXRlbTEsIDMwMDAsIDQuOCwgMjApLgpwcm9kdWN0KGl0ZW0yLCAxODAwLCA0LjIsIDIwMCkuCnByb2R1Y3QoaXRlbTMsIDUwMDAsIDQuOSwgNSkuCnByb2R1Y3QoaXRlbTQsIDI1MDAsIDQuNSwgODApLgoKJSDmnaHku7bmpJzntKLjg6vjg7zjg6s6IOipleS+oeOBjDQuNeS7peS4iuOAgeOBi+OBpOS+oeagvOOBjDMwMDDku6XkuIvjga7llYblk4HjgpLmir3lh7rjgZnjgosKcmVjb21tZW5kZWRfcHJvZHVjdChOYW1lLCBQcmljZSwgUmF0aW5nLCBSZXZpZXdzKSA6LQogICAgcHJvZHVjdChOYW1lLCBQcmljZSwgUmF0aW5nLCBSZXZpZXdzKSwKICAgIFJhdGluZyA+PSA0LjUsCiAgICBQcmljZSA9PCAzMDAwLgkvKiB5b3VyIGNvZGUgZ29lcyBoZXJlICovCgl0cnVlLgoKOi0gbWFpbi4=