Регистрация
1ivel3
27.02.2022 10:30
Информатика
Есть ответ 👍

решить задачу
Не понимаю

117
356
Посмотреть ответы 1

Ответы на вопрос:

themaximka41
themaximka41
4,5(58 оценок)

var n: integer;

begin

  read(n);

  if (n > 9999 or n< 1000) then

      writeln('вы дурак')

  else  begin

        if (n mod 10 = n div 1000 and n mod 100 div 10 = n div 100 mod 10) then

              writeln('полиндром')

        else writeln('нет');

  end;

end.

Популярно: Информатика