Christoph Grein has pointed out the problem with using Get to read
an Integer number from the input stream, as opposed to using Get_Line
to read the entire line.

In the Ada classes I teach, I recommend that the students use
Skip_Line to ignore everything after the initial input:

   Get(Number); -- Read Integer number
   Skip_Line;   -- Discard remainder of input buffer

Alternatively, if you use Get_Line(Line, Size) to read in the
entire line, then you can use the Integer Get from a string to
extract just the integer part (See RM A.10.8(15-16)):

   Get_Line(Line, Size);
   Get(From => Line(1..Size), Item => Number, Last => Last);

Hope this helps! (And that I didn't make any misteaks!)

-- 
--------------------------------------------------------------
-                 John J. Cupak Jr, CCP                      -
- Raytheon Systems Company - Software Engineering Laboratory -
- tel: 978-858-1222   email (work): jcj@swl.msd.ray.com      -
- fax: 978-858-4336   email (home): jcupak@aol.com           -
--------------------------------------------------------------