перевод в двоичн. систему

[terminadoor]

как перевести число из двоичной в десятиричную систему?

[alex_fcsm]

Допустим, нам нужно перевести число 19 в двоичное. Вы можете воспользоваться следующей процедурой :

19 /2 = 9 с остатком 1
9 /2 = 4 c остатком 1
4 /2 = 2 с остатком 0
2 /2 = 1 с остатком 0
1 /2 = 0 с остатком 1
Результат - 10011

Ставим числа из остатка друг за другом, начиная с конца. В результате получаем число 19 в двоичной записи (начиная с конца): 10011.

[kate158]

ПОПРОБУЙТЕ ТАКОЙ КОД

program ONE;
{$APPTYPE CONSOLE}
uses
  SysUtils;
var
  sDv: string;
  iMod, Dch, iDchr :integer;

begin
Writeln('Desiatichnoe chislo:');
  Readln(Dch);
  iDchr := Dch; 
  while Dch >= 2 do
    begin
      iMod := Dch mod 2;   
      Dch := Dch div 2;  
      sDv := IntToStr(iMod) + sDv; 
    end;
  sDv := IntToStr(Dch) + sDv;   
  Writeln(iDchr, '(10) = ', sDv, '(2)'); 
  Readln;
end.

+ В ИНТЕРНЕTЕ ПОЛНО ПРИМЕРОВ

зы. десятеричная система..это что-то новое..)
эмм. это перевод из десятичной в двоичную.

[Sweta]

Если не спомощью программы, то
к примеру имеем двоичное число 110101
перевод в десятичную систему осуществляется суммированием степеней имеющейся системы умноженной на коэффициеты, т.е
у нас шесть знаков в двоичном, следовательно максимальная степень 2^5 тогда N= 1*2^5+1*2^4+0*2^3+1*2^2+0*2^1+1*2^0 =32+16+0+4+0+1=53.
Если программно, то на каком языке?