3. Какую задачу решает приведенный фрагмент программы. Все переменные имеют целый тип, N>0
program t1;
var
k, n, p: integer;
begin
K := 0; N := P;
while N <> 0 do
begin
K := K * 10 + N mod 10;
N := N div 10;
end;
if P = K then Writeln('да') else Writeln('нет');
end.

44
0

ПРоверка числа-палиндрома

Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки
Быстрое выполнение от 2 часов
Проверка работы на плагиат

Похожие вопросы

Интересные статьи из справочника

Как стать тестировщиком игр, сняться на ТВ и вкусно поесть.
563 +54
0
Детальный обзор систем антиплагиата: как с ними работать и как повысить уникальность
12627 +50
7
Можно ли сдать экзамены раньше срока?
10170 +42
0
Сегодня вы студент, а завтра уже нет. Как вернуться к учебе после отчисления?
10222 +35
1
Доверьте свою работу экспертам
Разместите заказ
Наша система отправит ваш заказ на оценку 30 447 авторам
Первые отклики появятся уже в течение 10 минут