Как это нет??? там есть процедуры Val и Str.
Exp((Length(s)-i)*Ln(10)) это e^[ln(10)^(номер разряда-1)], т.е. 10^(номер разряда-1). В паскале как раз функции Power нет и нужно использовать искусственный прием. а лучше как s0Creator написал (опять я забыл про накопление
)