Сумарное число в цикле

[Tymchuk]

Доброго времени суток!
Такой простой вопрос, нужно вычислить сумарное число из чисел которые вычисляются в цикле, т.е если я ввожу количество повторений "n" то нужно высчитать n-ое кол-во площадей и суму этих площадей..
вот здесь то что я насочинял.. как лучше это прописать?

do
{
n++;
n=i;
try
{
elem = AnsiString(Edit14 -> Text);
a = StrToFloat(Edit12 -> Text);
b = StrToFloat(Edit13 -> Text);
 k = StrToInt(Edit15 -> Text);

}
catch(Exception &exception)
{
MessageBoxA(0,"Ââåäåíî íå ÷èñëîâ³ äàí³!", "Ïîìèëêà",0);
Memo2 -> Lines -> Clear();
}

Memo2 -> Lines -> Add("     Åëåìåíò : " + AnsiString(elem));
Memo2 -> Lines -> Add("    ");

Memo2 -> Lines -> Add("Øèðèíà = " + FloatToStr(a)+" (ìì)");
Memo2 -> Lines -> Add("Âèñîòà = " + FloatToStr(b)+" (ìì)");
 Memo2 -> Lines -> Add("    ");

S = a * b;
Memo2 -> Lines -> Add("Ïëîùà åëåìåíòà = " + FloatToStr(S)+" (êâ.ìì)");

Memo2 -> Lines -> Add("    ");

S_zag = S * k;
Memo2 -> Lines -> Add("Çàãàëüíà ïëîùà åëåìåíò³â = " + FloatToStr(S_zag) +" (êâ.ìì)");
Memo2 -> Lines -> Add("    ");
}while(n<i);

[Krok27]

S_summ += S+S_zag;

Что у нас с кириллицей?

[Tymchuk]

спасибо
наверное потому что на укр. языке пишу прогу.. но у меня в проге все норм..
только вот с циклом еще запутался вроде ничего такого но туплю.. корочь когда ввожу количество повторений он сразу считает введенные числа столько раз сколько я ввел кол-во повторений а мне надо что бы каждый раз отдельно можно реализовать ввод значений и отдельно их высчитывать.. я явно там что то упустил когда писал.. может подскажите?

[Tymchuk]

кстати немного не так)

S_summ += S_zag;

потому что если по предыдущему методу он сумирует площадь к площади умноженною но кол-во) но все рано спасибо)