Дано трехзначное число. Напишите программу, которая определяет:
является ли число "перевертышем", т.е. числом, десятичная запись которого читается одинаково слева направо и справа налево.
122 - нет
121 - перевертыш
222 - перевертыш

Видимо во всем мире только один язык программирования, но вот строчка, решающая задачу на двух языках:
if (a % 10 == a / 100) cout << "yes"; else cout << "no";             C
if a mod 10 = a div 100 then writeln('yes') else writeln('no');      Pascal

Var
   A:integer;
Begin
Write('Введите трёхзначное число: ');ReadLn(A);
if A div 100 = A mod 10 then WriteLn(A,' - перевёртыш')
else WriteLn(A,' - нет')
End.