dlugosc(blat, 10).
szerokosc(blat, 20).

powierzchnia(X, Y) :- dlugosc(X, D), szerokosc(X, S), Y is D*S.