calculations

> f:=x^100+50*x+1; ans:=diff(f,x);

>

> f:=x^100-50*x+1; diff(f,x);