Oops, I must have brainfarted when transcribing the prices over. There are still two solutions, though (here's a version which also prints out the rows' totals):
| ?- paytherent([199,379,549,159,229,359],X,Y).
X = [379,199,229,159,359,549] Y = [379,428,518,549] ? a
X = [359,199,229,159,379,549] Y = [359,428,538,549]
no subject
| ?- paytherent([199,379,549,159,229,359],X,Y).
X = [379,199,229,159,359,549]
Y = [379,428,518,549] ? a
X = [359,199,229,159,379,549]
Y = [359,428,538,549]