fork download
copy 
  1. % 商品データ: product(商品名, 価格, 評価, レビュー数)
  2. product(item1, 3000, 4.8, 20).
  3. product(item2, 1800, 4.2, 200).
  4. product(item3, 5000, 4.9, 5).
  5. product(item4, 2500, 4.5, 80).
  6.  
  7. % --- レビュー数に基づくクエリ例 ---
  8.  
  9. % 1. レビュー数が一定数以上の商品を探す
  10. % 使用例: high_review_count(50, Item).
  11. high_review_count(MinReviews, Item) :-
  12.     product(Item, _, _, ReviewCount),
  13.     ReviewCount >= MinReviews.
  14.  
  15. % 2. レビュー数が少ない（駆け出しの）商品を探す
  16. % 使用例: low_review_count(20, Item).
  17. low_review_count(MaxReviews, Item) :-
  18.     product(Item, _, _, ReviewCount),
  19.     ReviewCount =< MaxReviews.
Success #stdin #stdout 0.01s 5320KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
GNU Prolog 1.4.5 (64 bits)
Compiled Feb  5 2017, 10:30:08 with gcc
By Daniel Diaz
Copyright (C) 1999-2016 Daniel Diaz
| ?-
https://ideone.com/bgf5FO
language:
Prolog (gprolog 1.4.5)
created:
6 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!