Помогите пожалуйста в паскале.

Дано трехзначное число. Напишите программу определения, является ли оно палиндромом, т.е. числом, десятичная запись которого читается одинаково слева направо и справа налево.

Требуется вывести «YES», если число является палиндромом, и «NO» в противном случае.

Примеры:
входные данные ..............................выходные данные
101
............................................................................YES
142
............................................................................NO

Спасибо большое)

var  a: integer;begin  readln (a);    if (a mod 10 = a div 100) then write ('YES')  else write ('NO');end.