паскаль

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

Dima65

Подскажите пожалуйста как можно в массиве "перевернуть" число, т.е. например из 15 сделать 51 или из 74 - 47.
Заранее благодарю!
 
именно в паскале?
 
жательно...
 
Делаешь из числа строку и перемешиваешь букАФФки :)
 
Если не ошибаюсь в деталях, должно быть так: 10*(x mod 10)+(x div 10).
 
..инвертируй по-битно..
 
Код:
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]);
Вроде так, не проверял, писал на ходу.
 
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab

🚀 Первый раз на Codeby?
Гайд для новичков: что делать в первые 15 минут, ключевые разделы, правила
Начать здесь →
🔴 Свежие CVE, 0-day и инциденты
То, о чём ChatGPT ещё не знает — обсуждаем в реальном времени
Threat Intel →
💼 Вакансии и заказы в ИБ
Pentest, SOC, DevSecOps, bug bounty — работа и проекты от проверенных компаний
Карьера в ИБ →

HackerLab