![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 12.04.2008
Сообщений: 3
|
![]()
Как преобразовать десятичного числа в двоичное?
|
![]() |
![]() |
![]() |
#2 |
Пользователь
Регистрация: 09.01.2008
Сообщений: 30
|
![]()
function IntToBin(Value:LongInt; Size:Integer):string;
var i:integer; begin Result:=''; for i:=Size downto 0 do begin if Value and (1 shl i)<>0 then Result:=Result+'1' else Result:=Result+'0'; end; end; |
![]() |
![]() |
![]() |
#3 |
Регистрация: 12.04.2008
Сообщений: 3
|
![]()
Спасибо, хорошо придумано!
|
![]() |
![]() |
![]() |
#4 |
Регистрация: 12.04.2008
Сообщений: 3
|
![]()
А как сделать наоборот? (BinToInt)
|
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 09.01.2008
Сообщений: 30
|
![]()
Все даже легче!
Код:
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Преобразование числа в строку | )Игнат( | Общие вопросы Delphi | 6 | 06.07.2008 09:32 |
Преобразование числа с плавающей точкой в строку | Sibedir | Общие вопросы Delphi | 14 | 09.03.2008 21:48 |
C++. Перевод десятичного числа в двоичное | Panterka | Помощь студентам | 15 | 12.12.2007 15:04 |
информатика-дополнительный код десятичного числа | Artem1987 | Помощь студентам | 3 | 18.11.2007 14:32 |
Преобразование числа real к машинному виду | Roman999 | Общие вопросы Delphi | 3 | 01.05.2007 22:36 |