sets:
S/1..6/:a,b,d;
T/1..2/:e,x,y;
U(S,T):c;
endsets
data:
a=@ole(C:\Users\lenovo\Desktop\lingo.xlsx,'a');
b=@ole(C:\Users\lenovo\Desktop\lingo.xlsx,'b');
d=@ole(C:\Users\lenovo\Desktop\lingo.xlsx,'d');
x=5 2;
y=1 7;
e=20 20;
enddata
min=@sum(T(j): @sum(S(i): c(i,j)*@sqrt((x(j)-a(i))^2+(y(j)-b(i))^2));
@for( S (i) :@sum(T (j) : c(i,j)) = d(i));
@for( T (j) :@sum(s (i) : c(i,j))<= e(j));
model