Задать вопрос
13 октября, 04:29

Составить программу, проверяющую является ли число палиндромом

+5
Ответы (1)
  1. 13 октября, 05:45
    0
    Var S1, S2 : String; N : Byte; Error : Boolean;

    begin

    Write ('Введите натуральное число: ') ; ReadLn (S1) ;

    Error : = False; S2 : = ''; for N : = 1 to Length (S1) do if S1[N] in ['0' ... '9'] then S2 : = S1[N] + S2 else Error : = True;

    if Error then WriteLn ('В числе должны быть только цифры! ')

    else if S1 = S2 then WriteLn ('Введённое число - является полиндромом. ')

    else WriteLn ('Введённое число - не является полиндромом. ')

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Составить программу, проверяющую является ли число палиндромом ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы