Предмет: Информатика, автор: JinaJelly

С помощью ПаскаляЧисло в двоичной системе счисления, введенное
пользователем программы, преобразовать в десятичное число.
Используя цикл! Желательно попроще (без length, ord, exp).

Ответы

Автор ответа: HRAshton
0
var
  a, b, i: integer;
  d: string;
  
begin
  readln(a);
  d := a.ToString();
  for i := length(d) downto 1 do
    b += byte.Parse(d[i]) * round(power(2, length(d) - i));
  writeln(b);
end.

Незя без length, нерационально
Похожие вопросы
Предмет: Физика, автор: ayaka99