Помогите
написать программу перевода числа из двоичной системы в десятичную с
использованием функции возведения в степень. Я написала, но у меня
где-то ошибка.
 
b:=0;
m:=length(max)-1;
j:=m;

for i:=1 to m do

 begin

   val(max[i],p,code); 

   while j>=0 do 

     p:=p*step(2,j); 

   b:=b+p;
 j:=j-1;

  writeln(b);

  end;

Поясняю,
что тут и как. Эта мини-задача, входящая в решение одной масштабной
задачищи. Дана строка max, в которой записано двоичное число. Функция 
step(x,y:integer):integer
возводит число x в степень y. Помогите найти и исправить ошибку,
только, пожалуйста, не надо писать СОВЕРШЕННО ДРУГОЙ способ решения. Заранее благодарю))

Кстати, я тут уже решал задачу перевода из двоичной с/с в десятичную, написал функцию. которая не требует возведений в степень и вообще "красивее". Если есть куда сбросить - могу прислать.

не надо, мне так понятнее

как угодно.

единственный минус вашей профессии - это то, что не на кого злость вылить. Можно правда пинать системник, бить по клаве, выкидывать мышь в окно, когда ошибку не можешь найти в коде, но слишком это дороговато выходит впоследствии. А вот учителю повезлооо))

На самом деле это плюс. Раз выливать злость не на кого, очень быстро понимаешь, что и злиться смысла нет.