HTML            

Maxima

Maxima , . , , . f(x). f, solve fx = 0. Maxima batch. :

 /* -----------------------------------------------------  
 critpoints.max: (Maxima     C) -------------------------------------------------- 
*/ critpts():=( print("   "), /*   
  */ print("  f(x):"), f:read(), /*   
 ( ) */ print("f = ",f), /*   eq   
 */ eq:diff(f,x), /*   */ solve(eq, x) )$ 
( ), critpts. . :
 
(C1) batch("critpoints.max"); batching #p/home/test/critpoints.max (C2) critpts() 
:= (PRINT(" #   "), PRINT("  
f(x):"), f : READ(), PRINT("f = ", f), eq : DIFF(f, x), SOLVE(eq, x)) (C3) critpts() 
;       f(x): (x+2)/(x^2+1); 
x + 2 f = ------ 2 x + 1 (D3) [x = - SQRT(5) - 2, x = SQRT(5) - 2] 

" "