Работа 3.4 Упр.15 Задание 3 ГДЗ Семакин 10 класс (Информатика)

Задача

Рассмотрим вариант решения задания из учебника Семакин, Хеннер, Шеина 10 класс, Бином: 15. Палиндром — это сочетания символов, которые читаются одинаково слева направо и справа налево. Например, числа 4884, 121 являются палиндромами. Составить программу, которая определяет, является ли заданное натуральное число палиндромом. *Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания. 10 semakin10 pract/3-4/zad3/15 98

Подробный ответ

Пусть введено число a. Сохраним его копию в переменной b, а затем будем поразрядно «переворачивать» число: последнюю цифру добавлять к новому числу c, после чего удалять её из b.

Если после обработки всех цифр полученное число c совпадёт с исходным a, то число является палиндромом. Иначе — не палиндром.

var a,b,c: longint;
begin
  write(‘Введите целое положительное число a=’);
  readln(a);
  b := a;
  c := 0;
  while b > 0 do
  begin
    c := c * 10 + (b mod 10);
    b := b div 10;
  end;
  writeln(c);
  if c = a then write(‘Палиндром’)
  else write(‘Не палиндром’);
  readln;
end.