SETS
A alimento / 1*12/
B bebida / 13*20/
S sobremesa / 21*26/
D semana /SEG, TER, QUA, QUI, SEX, SAB, DOM/;
PARAMETERS
P(A) preco do alimento
/1  2.3
2  2.75
3  5.90
4  5.40
5  5.90
6  2.95
7  5.40
8  5.90
9  2.95
10  3.95
11  4.95
12  7.95/
E(B) preco da bebida
/13  4
14 4
15  2.90
16  2.90
17  2.20
18  2.20
19  2.20
20  2.20/
O(S)  preco da sobremesa
/21  2.95
22 2.95
23  2.95
24  1.95
25  1.95
26  1.50/
C(A) caloria do alimento
/1  296
2  304
3  590
4  530
5  550
6  410
7  491
8  394
9  233
10  395
11  373
12  747/
L(B) caloria da bebida
/13  463
14 465
15  280
16  302
17  168
18  0.6
19  149
20  0.6/
I(S)  caloria da sobremesa
/21  293
22  260
23  295
24  241
25  209
26  284/
G(A) gordura do alimento
/1  12
2  14
3  31
4  29
5  30
6  21
7  23
8  17
9  13
10  22
11  24
12  49/
K(B) gordura da bebida
/13  14
14  14
15  1.6
16  0
17  0
18  0
19  0
20  0/
U(S)  gordura da sobremesa
/21  9
22 8
23  10
24  11
25  6
26  3/
H(A) carboidrato do alimento
/1  30
2  30
3  47
4  35
5  34
6  34
7  53
8  44
9  24
10  46
11  21
12  42/
N(B) carboidrato da bebida
/13  68
14 67
15  63
16  72
17  40
18  0
19  35
20  0/
F(S)  carboidrato da sobremesa
/21  45
22 40
23  42
24  33
25  34
26  56/
R(A) proteina do alimento
/1  15
2  16
3  29
4  31
5  33
6  19
7  15
8  13
9  3
10  6
11  16
12  33/
J(B) proteina da bebida
/13  15
14 15
15  3
16  3
17  0
18  0
19  1
20  0/
Q(S)  proteina da sobremesa
/21  6
22  6
23  7
24  2
25  2
26  5/

;

VARIABLES
X(A,D) quantidade consumida de alimento por dia
Y(B,D) quantidade consumida de bebida por dia
T(S,D) quantidade consumida de sobremesa por dia
Z custo total;

INTEGER VARIABLE X,Y,T;

EQUATIONS
CUSTO  funcao objetivo
CALORIA (D)
GORDURA (D)
CARBOIDRATO (D)
PROTEINA (D)
VARIABILIDADE1 (A)
VARIABILIDADE2 (B)
VARIABILIDADE3 (S);

CUSTO .. Z=E= SUM((A,D), P(A)*X(A,D))+SUM((B,D), E(B)*Y(B,D)) + SUM((S,D),
O(S)*T(S,D));
CALORIA (D) .. SUM(A, C(A)*X(A,D))+ SUM(B, L(B)*Y(B,D))+ SUM(S, I(S)*T(S,D))
=L= 2000;
GORDURA (D) .. SUM(A, G(A)*X(A,D))+ SUM(B, K(B)*Y(B,D))+SUM(S, U(S)*T(S,D))
=L= 65;
CARBOIDRATO (D) .. SUM(A, H(A)*X(A,D))+ SUM(B, N(B)*Y(B,D))+SUM(S,
F(S)*T(S,D)) =L= 300;
PROTEINA (D) .. SUM(A, R(A)*X(A,D))+ SUM(B, J(B)*Y(B,D))+SUM(S, Q(S)*T(S,D))
=L= 54;
VARIABILIDADE1 (A) .. SUM(D, X(A,D)) =G= 1;
VARIABILIDADE2 (B) .. SUM(D, Y(B,D)) =G= 1;
VARIABILIDADE3 (S) .. SUM(D,T(S,D)) =G= 1;
MODEL MAC /ALL/;
SOLVE MAC USING MIP MINIMIZING Z ;
DISPLAY X.L, Y.L, T.L ;