param N := 5;

param A {1..10};
param D {1..10};
param C{1..10,1..5};
param B{1..5,1..5};
var x{1..N} := 0.1;
var F{i in 1..10} = A[i] + sum {j in 1..N} C[i,j]*x[j] + 0.5*(sum {j in 1..N} (x[j]*sum {k in 1..N} B[j,k]*x[k]))*D[i];

minimize f:
sum {i in 1..10} F[i]^2;

data;
param A:=
1	0.0426149
2	0.0352053
3	0.0878058
4	0.0330812
5	0.0580924
6	0.649704
7	0.344144
8	-0.627443
9	0.001828
10	-0.224783;

param D:=
1	2.34659
2	2.84048
3	1.12888
4	3.02286
5	1.72139
6	0.153917
7	0.290577
8	-0.159378
9	54.6910
10	-0.444873;

param C:
	1			2			3			4			5:=
1	-0.564255	0.392417	-0.404979	0.927589	-0.0735084
2	0.535493	0.658799	-0.636666	-0.681091	-0.869487
3	0.586387	0.289826	0.854402	0.789312	0.949721
4	0.608734	0.984915	0.375699	0.239547	0.463136
5	0.774227	0.325421	-0.151719	0.448051	0.149926
6	-0.435033	-0.688583	0.222278	-0.524653	0.413248
7	0.759468	-0.627795	0.0403142	0.724666	-0.0182537
8	-0.152448	-0.546437	0.484134	0.353951	0.887866
9	-0.821772	-0.53412	-0.798498	-0.658572	0.662362
10	0.819831	-0.910632	-0.480344	-0.871758	-0.978666;

param B:
	1			2			3			4			5:=
1	0.354033	-0.0230349 	-0.211938	-0.0554288	0.220429	
2	-0.0230349	0.29135		-0.00180333	-0.111141	0.0485461
3	-0.211938	-0.00180333	0.815808	-0.133538	-0.38067
4	-0.0554288	-0.111141	-0.133538	0.389198	-0.131586
5	0.220429	0.0485461	-0.38067	-0.131586	0.534706;

solve;

display x;