Помогите пожалуйста решить задачу в паскале: Составить программу…

Помогите пожалуйста решить задачу в паскале: Составить программу, проверяющую, является ли заданное натуральное число палиндромом, т.е. таким, которое читается одинаково слева направо и справа налево (например: 23132).

в избранное

dakota

27 июля 2022

var n, m, p: word; begin write ('Enter number: '); readln (n); m: =n; p: =0; while m > 0 do begin p: =p*10+m mod 10; m: =m div 10; end; if n=p then writeln ('Palindrome') else writeln ('Not palindrome'); readln; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Напишите алгоритм, под управлением которого робот обойдет прямоугольную область, обнесенную стеной…

Дан массив из 10 целых чисел. Определите сколько элементов этого массива имеют максимальноезначение

Цифры расположены в определенном порядке:…

Во время проведения школьного кросса три первых места заняли Алексей, Борис и Виктор

Написать программу нахождения треугольника. Значения сторон вводятся с клавиатуры

=ЕСЛИ (СУММ (А1: В1) >7; СРЗНАЧ (С1: С3); МИН (А1: С3) где ошибка?

Среди числовых данных найди лишнее число и зачеркни его. Объясни ответ

Установите в какому типу относятся следующие ошибки 1 Процэссор l А) Лишний символ l

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: