Re: interest computing problem

[Andrew <eagletalon@chartermi.net>]

Andrew wrote:
> 
> 
> Robert I. Eachus wrote:
> 
>> Andrew wrote:
>>
>>>    New_Line;
>>>    Put ("Your ending balance will be ");
>>>    Put (Balance,1,2,0);
>>
>>
>>
>> I think this will fix your problem, if I understand what you think is 
>> a problem.  If you want output in dollars and cents without exponents, 
>> this will do it. Look at the documentation for Put in 
>> Ada.Text_IO.Float_IO to understand why those numbers for the 
>> (otherwise defaulted) parameters.
>>
> OOOOH yeah.. that sounds very familiar.. I wrote the program initally in 
> 1997, and failed to properly document what things did and what they were 
> for.
> 
> here is the output for the program as it is now
> ==============
> How much money do you have-Please add cents? 1000.00
> What is the interest you will receive? .02
> How long will it be invested in weeks? 52
> 
> Your ending balance will be  1.00022E+03
> 
> ============
> and the ending balance should be 1020.2008 or more nicely written 1020.20
> but I will try the change as you suggest.
> 
> .. .. .. ..
> 
> ok bit of a problem . now it says the output (or final balance is)
> 1000.22
> 
> that is not good.
> and I had a friend who works at a local bank check the answer of 
> 1020.2008 and he says that, that is the correct answer.
> any ideas?
> thanks in advance.
> Andrew
> 


I felt that I should add a note here, so that there is no confusion.
when I said "ok bit of a problem . now ....." what I meant was that I 
had made the programming change that you suggested and wound up with the 
  value of 1000.22, the value of 1.00022E+03 was achieved before making 
the programming adjustment.