谁能帮忙编写个lingo程序.求最大值的程序.急用,

谁能帮忙编写个lingo程序.求最大值的程序.急用,
不好意思.由于没装公式编程的软件,所以只能用文字表述了.
矩阵七行十三列的.所有元素全部是由0和1两个数组成.所有这91个数的和相加等于八..每列的元素相加的和小于等于1..每一行的元素相加大于等于1小于等于2..用Xij表示第i行j列元素.
另外一个七行十三列的矩阵,用S表示.Sij表示第i行j列的元素.
求两个矩阵对应位置的元素相乘的总和（即两个求和符号后边是（Sij*Xij）） （i从1到7.j从1到13）的最大值
求这个题得lingo编程.由于不能编写公式,所以只能描述了.请大家见谅.
model:
sets:
r/1..7/;
c/1..13/;
l(r,c):s,x;
endsets
data:
0 0.44 0 0 0 0.35 0 0.64 0 0 0 0.64 0
0.5 0 0 0.33 0 0 0.51 0 0 0 0 0 0
0.63 0 0 0.36 0 0 0.6 0 0 0 0 0 0
0.34 0 0.33 0 0.53 0 0 0.34 0 0 0.32 0 0
0.37 0 0.36 0 0.56 0 0 0.37 0 0 0.34 0 0
0 0 0.62 0 0 0.52 0 0 0.55 0.36 0 0.34 0
0 0 0.51 0 0 0.43 0 0 0.45 0.30 0 0.29 0
;
enddata
max=@sum(l:s*x);
@sum(l:x)=8;
@for(r(i):@sum(c(j):x(i,j))>=1;@sum(c(j):x(i,j))