Rewrite procedure to iterate with accumulator

I rewrote the procedure to explicitly use an accumulator as a state
variable. The previous procedure definition was succinct, and I liked it
too much, so I moved that one into the ex1-17-mul-by-fast-add.scm file.
Rewrite procedure to one that takes less steps