• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

паскаль

  • Автор темы Dima65
  • Дата начала
D

Dima65

Подскажите пожалуйста как можно в массиве "перевернуть" число, т.е. например из 15 сделать 51 или из 74 - 47.
Заранее благодарю!
 
A

astronom

Делаешь из числа строку и перемешиваешь букАФФки :)
 
Y

Yason

Если не ошибаюсь в деталях, должно быть так: 10*(x mod 10)+(x div 10).
 
V

Vadik(R)

Код:
function invert(x:integer):integer;
var
z:integer;
begin
z:=0;
while x>0 do
begin
z:=z*10+(x mod 10);
x:=x div 10
end;
invert:=z
end;
begin
...
for i:=1 to n do
a[i]:=invert(a[i]);
Вроде так, не проверял, писал на ходу.
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!