unsigned int n=StrToInt(Edit1->Text);
float x;
double S=0;
for(float j=1;j<=n;j=(2*j-1))
S=S+((pow(x,j))/j);
Label1->Caption=StrToInt(S);