yurassolo747
?>

Язык Pascal. Напишите программу, которая позволяет вводить с клавиатуры 5-значное число и определять, является ли число палиндромом. Палиндром — число (или слово), котороеодинаково "читается" слева направо и справа налево. Например, число 12321 –палиндром, а число 12345 — нет.На вход программы подаётся 5-значное натуральное число (проверку корректности вводапроводить не надо), на выходе должно появиться одно слово - Yes, если число являетсяпалиндромом, и No, если нет.Вспомните разговор о типах данных! В этой задаче число 5-значное, оно может бытьбольше 32767. В некоторых версиях Pascal такое число не может быть описано какinteger. Поэтому для корректной работы программы входное число следует описатьKax longint.​

Информатика

Ответы

Кирьяков-Крикунов

всё ещё проще. будем считать число строкой символов. И если первый и последний и второй и предпоследний символы равны - то это и будет палиндром. Прикольно что это будет работать и со строковыми данными - словами   :))

Объяснение:

var

 s : string;

begin

 readln(s);

 writeln('');

 if (s[1]=s[5]) and (s[2]=s[4]) then

   writeln('Yes')

 else

   writeln('no')

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Язык Pascal. Напишите программу, которая позволяет вводить с клавиатуры 5-значное число и определять, является ли число палиндромом. Палиндром — число (или слово), котороеодинаково "читается" слева направо и справа налево. Например, число 12321 –палиндром, а число 12345 — нет.На вход программы подаётся 5-значное натуральное число (проверку корректности вводапроводить не надо), на выходе должно появиться одно слово - Yes, если число являетсяпалиндромом, и No, если нет.Вспомните разговор о типах данных! В этой задаче число 5-значное, оно может бытьбольше 32767. В некоторых версиях Pascal такое число не может быть описано какinteger. Поэтому для корректной работы программы входное число следует описатьKax longint.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

gutauta6
sergeevich
hbqhzwtd
saltikovaPavlenko
X2755070
marinaled8187
Нана_Елена
ea9824165833886
msk-academ
rsksnb
ktv665
kzhgutova
dawlatowajana
menesmir
znaberd786