Помогите
написать программу перевода числа из двоичной системы в десятичную с
использованием функции возведения в степень. Я написала, но у меня
где-то ошибка.
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. Помогите найти и исправить ошибку,
только, пожалуйста, не надо писать СОВЕРШЕННО ДРУГОЙ способ решения. Заранее благодарю))