Требуется написать программу, определяющую, является ли четырехзначное натуральное число n палиндромом, т.е. числом, которое одинаково читается слева направо и справа налево. входные данные натуральное число n (1000 ≤ n ≤ 9999). выходные данные следует вывести слово «yes», если число n является палиндромом, или «no» – если нет.

natalikohan12p0domq natalikohan12p0domq    3   30.09.2019 06:30    6

Ответы
dela19 dela19  09.10.2020 04:49
PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var s := ReadInteger('n=').ToString;

 if (s[1] = s[4]) and (s[2] = s[3]) then Println('YES')

 else Println('NO')

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика