Дано четырехзначное число. Определите, является ли его десятичная запись симметричной. Если

Дано четырехзначное число. Обусловьте, является ли его десятичная запись симметричной. Если число симметричное, то выведите 1, иначе выведите хоть какое иное целое число. Число может иметь меньше 4 знаков, тогда необходимо считать, что его десятичная запись дополняется слева незначащими нулями.

Входные данные
Вводится единственное число.

Выходные данные
Выведите ответ на задачку.

Образцы
входные данные
2002
выходные данные
1

Задать свой вопрос
1 ответ
Var a,a1,a2:integer;
begin
readln(a);
a1:=a div 1000;
a2:=a div 100 mod 10;
if a2*10+a1 = a mod 100
 then writeln(1) else writeln(0);
end.

Пример:
1221
1
Мирослава Болтянская
Слышь! Написано решить на питоне! А скопировать и я могу
Ksenija Kljarovskaja
1. В задании не указан язык программирования. 2. Рекомендую Для вас выучить верховодила сетевого этикета и управляться этими правилами при общении в сети.
Арина Бывшова
Прошу помилования забыл написать
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт