masterrr
@masterrr
Самый быстрый алгоритм dec -> bin на Pascal
Подскажите, пожалуйста, какой самый быстрый алгоритм преобразования числа в двоичное из десятичного можно реализовать на Pascal?
Уже есть варианты:
1. Рекурсия:
2. «Игра» со строками:
3. И самое обычное, простое решение задачи:
Потребление памяти не важно, важно время выполнения и возможность перевода чисел типа int64 (-9223372036854775808..9223372036854775807)
Уже есть варианты:
1. Рекурсия:
function bin(a: integer):integer;
begin
if a>=2 then
bin(a div 2);
write(a mod 2);
end;2. «Игра» со строками:
while n>0 do begin
if n mod 2 = 0 then
s:=s+'0'
else begin
s:=s+'1';
n:=n-1;
end;
n:=n div 2;
end;
for i:=length(s) downto 1 do
write(s[i]);
end;3. И самое обычное, простое решение задачи:
while a>=1 do
begin
i:=i+1;
b[i]:=a mod 2;
a:=a div 2;
end;
n:=i;
for i:=n downto 1 do
write(b[i]);
Потребление памяти не важно, важно время выполнения и возможность перевода чисел типа int64 (-9223372036854775808..9223372036854775807)
- Вопрос задан
- 6796 просмотров
3
комментария
anmipo
@anmipo
Очевидная оптимизация:
b[i]:=a and 1;
a:=a shr 1;
Войдите, чтобы написать ответ
Войти через центр авторизации-
-
Позиционные системы счисления
- 2 подписчика
- 3170 просмотров
-
Простой
Чем реализовать возврат системы в исходное состояние после перезагрузки?
- 1 подписчик
- 157 просмотров
-
Простой
Где купить компьютер с российским процессором и операционной системой?
- 3 подписчика
- 1420 просмотров
-
Простой
Как найти все простые несократимые дроби, меньшие 1, знаменатели которых не превышают 9?
- 1 подписчик
- 94 просмотра
-
-
Простой
Как сделать, чтобы программа работала без copy, т.е. без процедур и функций в pascal abc.net?
- 1 подписчик
- 24 просмотра
-
- Показать ещё Загружается…
