set Froccs;
set Ingredients;

var kf >=0, integer;
var nf >=0, integer;
var hl >=0, integer;
var hm >=0, integer;
var vh >=0, integer;
var krf >=0, integer;
var sf >=0, integer;
var pf >=0, integer;
var hu >=0, integer;
var lf >=0, integer;



s.t. bor: kf*1 + nf*2 + hl*1 + hm*3 + vh*2 +krf*9 + sf*1 + pf*6 + hu*4 + lf*1 <= 1000;
s.t. szoda: kf*1 + nf*1 + hl*2 + hm*2 + vh*3 +krf*1 + sf*9 + pf*3 + hu*1 + lf*4 <= 1500;

maximize arbevetel: (kf*200 + nf*330 + hl*210 + hm*470 + vh*400 + krf*1500 + sf*300 + pf*900 + hu*600 +lf*250 );
end;