ошибка аппроксимации

[maxick96]

возникла проблема
аппроксимация на консольке работает на ура!
но вот если перенести эту функцию на WinAPI - то выводит одни нули
почему так?
аппроксимация методом МНК

int q=3, m=4,k=1;
				long double s0=0,s1=0,s2=0;
				long double a[3][4]={{0,0,0,0},{0,0,0,0},{0,0,0,0}},
						    a0[3][4]={{0,0,0,0},{0,0,0,0},{0,0,0,0}};
				a0[0][0]=a[0][0]=k+1;
				for(int e=0; e<=k; e++)
					a0[0][1]=a0[1][0]=a[0][1]=a[1][0]=a[1][0]+x[e];
				for(int e=0; e<=k; e++)
					a0[0][2]=a0[1][1]=a0[2][0]=a[0][2]=a[1][1]=a[2][0]=a[2][0]+pow(x[e],2);
				for(int e=0; e<=k; e++)
					a0[1][2]=a0[2][1]=a[1][2]=a[2][1]=a[2][1]+pow(x[e],3);
				for(int e=0; e<=k; e++)
					a0[2][2]=a[2][2]=a[2][2]+pow(x[e],4);
				for(int e=0; e<=k; e++)
					a0[0][3]=a[0][3]=a[0][3]+y[e];
				for(int e=0; e<=k; e++)
					a0[1][3]=a[1][3]=a[1][3]+x[e]*y[e];
				for(int e=0; e<=k; e++)
					a0[2][3]=a[2][3]=a[2][3]+pow(x[e],2)*y[e];
				int e,j;
				long double buf,l[3];
				for(e=0;e<q-1;e++)
				for(j=e+1;j<q;j++)
				{
					buf=a[e][e]/a[j][e];
					for(k=0;k<=q;k++) 
						a[j][k]=a[j][k]*buf-a[e][k];
				}
				l[q-1]=a[q-1][q]/a[q-1][q-1];
				for(e=q-2;e>=0;e--)
				{
					buf=0;
					for(j=e+1;j<q;j++)
					buf+=a[e][j]*l[j];
					l[e]=(a[e][q]-buf)/a[e][e];
				}
				s0=l[0];
				s1=l[1];
				s2=l[2];
				sprintf(test1,TEXT("%.6f"),s0);
				SetDlgItemText(hDlg,IDC_EDIT27,test1);
				sprintf(test1,TEXT("%.6f"),s1);
				SetDlgItemText(hDlg,IDC_EDIT33,test1);
				sprintf(test1,TEXT("%.6f"),s2);
				SetDlgItemText(hDlg,IDC_EDIT32,test1);