% umfang(+K,-U)  U ist der Umfang des Kreises K.
umfang(kreis(_,R),U):-
    U is 2*pi*R.

% flaecheninhalt(+K,-F)  F ist der Flaecheninhalt des Kreises K.
flaecheninhalt(kreis(_,R),F):-
    F is pi*R*R.

% ?- umfang(kreis(punkt(3,1),2),U).
% ?- flaecheninhalt(kreis(punkt(3,1),2),F).
