Требуется написать программу, определяющую, является ли четырехзначное натуральное число...

0 голосов

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


спросил от (19 баллов) в категории Информатика
оставил комментарий от

На системе dots проверяют?

оставил комментарий от (19 баллов)

это ппаскаль.

1 Ответ
0 голосов
ответил от БОГ (678k баллов)
 
Лучший ответ

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.

оставил комментарий от (19 баллов)

спасибо большое)

оставил комментарий от БОГ (678k баллов)

Пожалуйста

оставил комментарий от (19 баллов)

Но не хочет работать ни на старой ни на новой. Ни даже онлайн.

оставил комментарий от БОГ (678k баллов)

Что значит "не хочет"? Онлайн точно не будет работать. потому что онлайн-версий PascalABC.NET не существует. Что происходит, что пишет?

оставил комментарий от БОГ (678k баллов)

И, пожалуйста, напишите версию, в которой пробуете запускать.

оставил комментарий от (19 баллов)

Все в порядке, ошибки исправила. Спасибо еще раз.

оставил комментарий от БОГ (678k баллов)

Для выражения "спасибо" тут принято просто щелкать красненькое сердечко.

...