Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.11;
Скачать: CL | DM;

Вниз

Алгорим перевода из десятичной в двоичную СС   Найти похожие ветки 

 
Roman_ln ©   (2006-05-23 11:08) [0]

На Delphi???


 
Efir   (2006-05-23 11:12) [1]

Можно примерно так:

function IntToBin(int:int64):string;
var
 i:integer;
 s:string;
begin
 s:="";
 i:=63;
 repeat
   i:=i-1;
   if ((int shr i) and 1)>0 then begin
     for i:=i downto 0 do  s:=s+IntToStr((int shr i) and 1);
     Break;
   end;
 until i<0;
 Result:=s;
end;


 
Ega23 ©   (2006-05-23 11:13) [2]

А оно и так в двоичной системе. Нолики и единички. А десятичная система - это от лукавого.



Страницы: 1 вся ветка

Текущий архив: 2006.06.11;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.026 c
9-1131353827
Med
2005-11-07 11:57
2006.06.11
ошибка компиляции проги с компонентами GLScene


1-1146820596
Delphi5.01
2006-05-05 13:16
2006.06.11
Получение handle-а активного компонента (вне рабочей формы)


8-1134483031
calmterror
2005-12-13 17:10
2006.06.11
Визуализация звука


2-1148458182
elfebet
2006-05-24 12:09
2006.06.11
Как выбрать десятичное число случайным образом (random)?


2-1148633281
ASW
2006-05-26 12:48
2006.06.11
Работа с группой компонентов