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

Ответы

Ответ дал: Аноним
0

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.

Ответ дал: rachelrot84
0
Но не хочет работать ни на старой ни на новой. Ни даже онлайн.
Ответ дал: Аноним
0
Что значит "не хочет"? Онлайн точно не будет работать. потому что онлайн-версий PascalABC.NET не существует. Что происходит, что пишет?
Ответ дал: Аноним
0
И, пожалуйста, напишите версию, в которой пробуете запускать.
Ответ дал: rachelrot84
0
Все в порядке, ошибки исправила. Спасибо еще раз.
Ответ дал: Аноним
0
Для выражения "спасибо" тут принято просто щелкать красненькое сердечко.
Вас заинтересует