Update palindrom.pas