Перевести число из двоичной в десятиричную систему счисления

[MrZerg]

Перевести число из двоичной в десятиричную систему счисления на Паскале, используя формулу N=∑_(i=0)^(n-1) e_i *m^i , где m - основой системы исчисления, n - количество разрядов, e_i - значение коэффициента i-того порядка. Помогите плз

[Ak1ra]

ICQ: 336023974.

[Хыиуду]

for i:=1 to length(s) do x:=2*x+(ord(s)-ord('0'));
s - исходная строка, x - результат

[samec2011]

Стучите в асю 11один11-5шесть5шесть, обсудим.