f:read("Gib einen rationalen Funktionsterm ein");

f(x):=''f;

nenner:denom(f);

l:realroots(nenner);