% W ogrodzie siedzialy 4 pary narzeczonych
% i zajadaly sliwki

% ania zjadla 2 sliwki
% Beata 3 sliwki
% celina 4 sliwki
% danusia 5 sliwek
% andrzej tyle co narzeczona
% bogumil 2x tyle co narzeczona
% cezary 3x tyle co narzeczona
% damian 4x tyle co narzeczona

% wszyscy razem zjedli 44 sliwki
% jakie sa imiona par narzeczonych


wynik([X1, Y1], [X2, Y2], [X3, Y3], [X4, Y4]) :-
           D1=[2,3,4,5],
           C1=[1,2,3,4],
           select(X1, D1, D2),
           select(X2, D2, D3),
           select(X3, D3, [X4]),
           select(Y1, C1, C2),
           select(Y2, C2, C3),
           select(Y3, C3, [Y4]),
           44 is X1 + X1 *Y1 + X2+X2*Y2 + X3 +X3*Y3 +X4+X4*X4,!.