Re: Binary value

["Smark" <nobody@home.com>]

"Smark" <nobody@home.com> wrote in message
news:9a2qhh$jee4@cui1.lmms.lmco.com...
>
> "chris.danx" <chris.danx@ntlworld.com> wrote in message
> news:K84x6.4066$MZ2.743519@news2-win.server.ntlworld.com...
> > > I see... that answers half of my question. This presumes I wanna convert
> > > from binary to Integer. But is it possible to "convert" a Integer value to
> > > binary.
> >
> > Suppose you have the value 123 in binary.  To convert to binary you need to
> > follow this algorithm.
> >
> > while num /= 0 loop
> >     rem := num mod 2;    -- get remainder
> >     num := num - rem;
> >     add rem'image to front* of string;
> > end loop;
> >
> > {I think this is the correct algorithm!}
>
> Well, Chris, you would probably change your mind if you tried it!
> As in your example, say you start with 123.
>
> First pass through loop:
> rem := 123 mod 2 ( = 1)
> num := 123 - 1 ( = 122)
> add "1" to front of string   -- so the string now looks like "1"
>
> Second pass:
> rem := 122 mod 2 ( = 0)
> num := 122 - 0 ( = 122)
> add "0" to front of string   -- so the string now looks like "01"
>
> Third pass:
> rem := 122 mod 2 ( = 0)
> num := 122 - 0 ( = 122)
> add "0" to front of string   -- so the string now looks like "001"
>
> Beginning to see a problem here?
>
> I think the algorithm you were trying to think of goes something like:
>
Okay, I take it back.  The algorithm I provided does work, but it is
not the one you were thinking of.  That would be more like:

while num /= 0 loop
    rem := num mod 2;    -- get remainder
    num := Floor(num/2);
    add rem'image to front* of string;
end loop;

Mark
Arlington, Texas