1var int: a; 2var int: b; 3 4constraint 200*a + 150 * b <= 4000; 5constraint 100*a + 250 * b >= 0; 6 7solve satisfy; 8 9output ["a = ",show(a), " b = ", show(b), "\n"]; 10%output ["a = \(a);\n"];
dekker.one