С помощью Паскаля: Число в двоичной системе счисления, введенное пользователем программы,...

Question

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

Answer 1

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, нерационально