Вопрос pascal На вход подается число в двоичной системе счисления, на выход - оно же в десятичной. Пример:

[NoQuest1ons]

На вход подается число в двоичной системе счисления, на выход - оно же в десятичной. Пример: ввел 101, получил 5
и к, и как сделать на оборот ввел 5 получил 101. Используя массив массив

 

[forcrack]

Так же, как обычно, делением с остатком

 

[Andrey151098]

>Используя массив массив А массив тут не нужен не нужен

 

[feda]

var i, n: integer; s: string; ReadLn(s); // из двоичной в деятичную n := 0; for i := 1 to Length(s) do n := (n shl 1) or (Ord(s) - 48); WriteLn; ReadLn; // из десятичной в двоичную s := '; while n > 0 do begin Insert(Char(48 + (n and 1)), s, 1); n := n shr 1; end; WriteLn(s);