Question

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

Answer 1

var n:integer;
begin
write('n = ');
readln(n);
if abs(n) div 100 = abs(n) mod 10
 then writeln('Перевертыш') else writeln('Не перевертыш');
end.

Пример:
n = 121
Перевертыш