fovaros(franciao, parizs).
fovaros(usa, washington).
fovaros(magyaro, budapest).

uzemel(parizs, hp).
uzemel(parizs, dior).
uzemel(parizs, chanel).
uzemel(budapest, kinoin).
uzemel(budapest, mom).

elad(hp, 120).
elad(dior, 200).
elad(chanel, 300).
elad(kinoin, 130).
elad(mom, 140).

nagy(C) :- fovaros(C, X), uzemel(X,Y), elad(Y, Z), Z > 100.

