%UTF-8
:- include('palindrome.pro').
:- initialization(q).
q :- P = 'нажал кабан на баклажан', q(P), write(P), write(' - палиндром'), nl.
