2.mws

>    restart; problem #2

>    f:=x->8*x^2-6*x^9; #define our function

f := proc (x) options operator, arrow; 8*x^2-6*x^9 end proc

>    f1:=D(f);  #find derivative

f1 := proc (x) options operator, arrow; 16*x-54*x^8 end proc

>    f1(x); #answer

16*x-54*x^8