Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
nastyabulgakov1
01.08.2020 19:55 •
Информатика
Напишите функцию function reverse (n: integer): integer (pascal), которая переставляет цифры числа в обратном порядке .
Показать ответ
Ответ:
Esken213141
23.09.2020 23:51
Function reverse(n:integer):integer;
var m:integer;
begin
m:=0;
while n>0 do
begin
m:=m*10+n mod 10;
n:=n div 10;
end;
reverse:=m;
end;
begin
writeln(reverse(12345));
end.
Результат:
54321
0,0
(0 оценок)
Популярные вопросы: Информатика
шота1
29.02.2020 22:20
Задали по информатике! вычислите значение функции y= √x , x≥0 x^2, x 0 !...
monkeyone
25.01.2022 15:38
в девятеричной системе: сложный пример на вычитание и к нему проверку на сложения...
ПУТИН222
17.01.2023 00:41
Решить на паскале: в двумерном массиве хранятся результаты (время в минутах), показанные каждым из 12 автогонщиков на каждом из 10 этапов соревнований «формула-1». после 10 этапа...
aidarisiev80
17.01.2023 00:41
Как нарисовать флаг ирландии в паскале?...
myzroman
17.01.2023 00:41
Выясните принадлежат ли числа a и b промежутку (-1; 1) паскаль....
ponchikelo
17.01.2023 00:41
Как вывести текстовое сообщение на полный экран в pascal abc? pls быстрей...
lol756
02.02.2023 05:53
Задания суммативного оценивания за 4 четверть 8 класс 2 вариант. Прослушайте текст. Нанотехнология - технология с атомарной точностью - обладает революционным потенциалом для...
Dacha07K
09.10.2022 05:31
15. Какого цвета был волшебный напиток, приготовленныйведьмойДЛЯРусалочки?...
milanabzhityants
15.05.2022 10:35
Выбери алгоритм установки пароля на документустановка пароля- ввести парольфайл-сведения- установка пароляфайл- создать- установить парольвыбрать установку пароля...
daravill1
27.04.2023 22:32
Задача на построение: а) построй треугольник по двум сторонам и углу между ними б) в полученом треугольеике постройте биссектрису одного из углов...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var m:integer;
begin
m:=0;
while n>0 do
begin
m:=m*10+n mod 10;
n:=n div 10;
end;
reverse:=m;
end;
begin
writeln(reverse(12345));
end.
Результат:
54321