1. Дано трехзначное число. Выяснить, является ли оно палиндромом («перевертышем»), то есть таким числом, десятичная запись которого читается одинаково слева направо и справа налево

Question

1. Дано трехзначное число. Выяснить, является ли оно палиндромом («перевертышем»), то есть таким числом, десятичная запись которого читается одинаково слева направо и справа налево

Гость

Ответ(ы) на вопрос:

Accepted Answer

program xxx; var n, c, d, e, k : integer; begin wtite ('введите 3-х значное число N ='); readln (n); c := n div 100; d := (n div 10) mod 10; e := n mod 10; k:= 100*e + 10*d + c; if n = k then write ('палиндром') else write('не палиндром') end.