On 8 Lut, 22:58, "Bastion" <b...@m...pl> wrote:

> 1)  To nie jest sposob na wyliczenie stanu konta ale jestes blisko.
> 2) Czy kod jest lady? Raczej, formalnie, maksymalnie uproszczony.

Daleko mu do maksymalnego uproszczenia. Ciagle odczytywanie
i zapisywanie do kontrolki nie pomaga w wydajnosci (tu nieistotnej).

StrToFloat(StringGrid1->Cells[1][i-1]) +StrToFloat(StringGrid1-
>Cells[1][i-1])*0.1
to to samo co StrToFloat(StringGrid1->Cells[1][i-1])*1.1

Calosc wygladala by sensowniej tak:

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
float bla=4000;

StringGrid1->Cells[1][0]=FloatToStr(bla);

for(int i=1; i<21;i++)
{
StringGrid1->Cells[0][i]=FloatToStr(2010+i);
bla*=1.1;
StringGrid1->Cells[1][i]=FloatToStr (bla);
}
}


> 3) Nie nie interesuje mnie "kwota w roku 2020," tylko w roku 2030

racja

> 4) " czyli 4000*1.1^20, niecale 27kzl.".  Nie procedura daje inny wynik

Inna kwota? Czy moze chodzi o to, ze wypelnia tabelke?

pzdr
bartekltg