Rešitev: program Ničle podane funkcije (Mathematica)

Iz MaFiRaWiki

Naloga: program Ničle podane funkcije

 nicle::usage = "Funkcija nicle[f] vrne seznam vseh različnih rešitev enačbe f[x]= 0.";
 nicle[f_] := Union[Solve[f == 0, x] /. {x -> s_} -> s]

Primer uporabe:

In[2]:= (nicle[(x - 1)^2(x + 3)(x - 8)x]
Out[2]= {-3, 0, 1, 8}

Glej tudi

Osebna orodja