Деление числа

int a=12345;
int count=1;
while (a/=10)
   count++;

int i=0;
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int a=0,b=0,c=0;  //тут переменные
b=StrToFloat(LabeledEdit1->Text); //тут введенное число присваиваем переменной В
c=a=b;         //конечно можно было поварьировать и с сеньшим числом переменных
                  //но пусть будет так
int count=1;
while (a/=10)     //пока число делится на 10 (на ноль делить нельзя)
   count++;       //тут понятно
 
 
if(count==13)    //если равно
{
  c=b/10;         //сокращаем на порядок
 
  b=c%10000;   //а вот здесь надо бы внести в b последние 5 цыфр,
                     //тоесть пятизначное число или как это... остаток от деления
  i=i+b;           // здесь суммируем i, даже если не первая операция
 
  Panel1->Caption = FloatToStr(i=(i + StrToFloat(LabeledEdit1->Text))); //собственно выводим на панель
 
//но какаято херня с чисом получаеся
 
}
  else // а вот точто было бы иначе работает отлично...правда еще может быть 0...не проверял
  {
Panel1->Caption = FloatToStr(i=(i + StrToFloat(LabeledEdit1->Text)));
  }
}
//---------------------------------------------------------------------------