В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Schumka12
Schumka12
16.02.2023 20:26 •  Информатика

Вводится число. требуется вывести его так, чтобы составляющие его цифры шли в обратном порядке. например, вводится число 4096, надо вывести 6904.если найти остаток от деления на 10, то мы получим последнюю цифру числа.запишем эту цифру в новое число.разделим старое число нацело на 10, так мы избавимся от последней цифры в нем.снова найдем остаток от деления на 10. получим вторую с конца цифру исходного числа.если мы умножим новое число на 10, то получим "дополнительный" младший разряд, куда можем записать вторую цифру исходного числа (простым сложением).будем повторять вышеописанные действия пока исходное число не станет равным нулю. объясните как это сделать! подробно!

Показать ответ
Ответ:
Alisherjon1985
Alisherjon1985
01.10.2020 18:03
Var a:integer;
begin
readln(a);
while(a<>0) do begin
write(a mod 10);
a:=a div 10;
end;
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота