kill(all)$

van=facebook.com/LearningCalculus$

mod(4444^4444,18);

for i: 0 thru 2 do
    for j: 0 thru 2 do
        print("Answer ", i, j, mod(i,j));

        4) Plot3D

expr_1: x$
expr_2: y$
expr_3: mod(x,y)$
plot3d (
        [expr_1, expr_2, expr_3],
        [x, 0, 4],[y, 0, 4],
        ['grid, 4, 4]);