tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Напишите функцию function
Напишите функцию function reverse (n: integer): integer (pascal), которая переставляет цифры числа в обратном порядке .
DanilDanq
1 23.07.2019 13:30
1
Ответы
nissanbaev25
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ghostridermen
01.12.2020 19:14
Постройте таблицу истинности по информатике...
viktoriav84
01.12.2020 19:14
Сколько будет 100101 · 101,011 11 · 101+1110 · 111 1001 · 101 - 1110 + 111...
364590
01.12.2020 19:14
С таблиц истинности докажите законы общей инверсии для логического умножения и логического сложения.2. Даны три числа А=110002, В= 2410, С=1316 Переведите числа в двоичную систему...
432120
26.05.2019 21:50
Закончите сказку: жили-были клавиатура, монитор, память и процессор, жили они дружно пока не возник спор кто из них...
05Goryanka05
26.10.2020 09:51
Двоичное представление информации. Урок 1. Повторение Отсортируй числа от 0 до 9 в порядке возрастания. Некоторые числа представлены в двоичнІ 100016I 101be...
олжас200
26.10.2020 09:52
Это некоторый объект (человек, животное, техническое устройство выполнять определённый набор команд...
NyushaLove
26.10.2020 09:52
информатика видно надеюсь...
Marcelyn
26.10.2020 09:52
УМОЛЯЮ ЭТО ВСЕ КОТОРЫЕ У МЕНЯ ЕСТЬ \1. Преобразуй единицы измерения информации А) 7 Кбайт = __бит Б) 224 бит = 2 ---Кбайт 2. Имеется текст, объем которого 50 килобайт. На каждой...
мандаринылюблю
20.12.2019 16:28
Данны три числа в десятичной системе счисления а=17,в=22,с=19 переведите числа в двоичную сичтему счисления и выполните поразрядено логические операции: аv(b& c)b& (avbvc)...
KIA79
20.12.2019 16:26
60 . как создать такой график в маткаде и экселе? желательно подробно разъяснить. сам попробовал создать, но у меня получается какая-то ломаная линия...
Популярные вопросы
Скільки існує звичайних дробів, чисельник і знаменник якихрізні прості числа,...
2
Згадайте та напишіть приклади конструктивного та деструктивного конфлікту...
3
Схема обмена пировиноградной кислоты....
3
Соч 5 класс 1 четверть математика там дальше запишите нескоратимое: ...
1
Какой предмет открыл фархад в сказке фархад и ширин а)сундук б)мешок в)ларец...
2
Установите соответствие между биологическим процессом и его свойствами. Свойство:...
1
Есенберлиннің «Көшпенділер» трилогиясын оқығаннан кейін, мектеп журналына...
3
What does this text mainly explain?...
3
Допиши окончания глаголов I и II спряжения....
3
Мәтінді оқыңыз. Оның басты идеясын 5 6 сөйлеммен жазбаша түсіндіріңіз. 2-мәтінҚазақстанның...
3
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