III/13

program III;//название
var//объявление переменных
digit, number:integer;//digit - цифра числа, number - само число
begin
  Readln(number);//считываем число
  digit := number MOD 10;//выделяем последнюю цифру, чтобы использовать сложное условие
  if ((number MOD 10 = digit) and (number DIV 10 = digit)) then//если последняя цифра числа равна digit и первая цифра числа равна digit
    WriteLN('True')//вернуть истину
  else//иначе
    WriteLN('false');//ложь
end.