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

Является ли число "перевёртышем", т.е. числом, десятичная запись которого читается одинаково слева направо и справа налево.

vara:integer;begin  writeln('a ?');  readln(a);     if (a mod 10)=(a div 100) then         writeln('Yes')     else         writeln('N');end.