kill(all);

van=facebook.com/LearningCalculus;

f(x):=abs(x-2)+abs(x+4)+abs(x-1)-5;

solve(f(x),x);

f(1+%i);

for a: -100 thru 100 do
    for b: -100 thru 100 do
        if(f(a+b*%i) = 0) then
        print(a,b);