RowBox[{RowBox[{RowBox[{3., , PRAVA, , RACIONALNA, , FUNKCIJA,   , R, (x)}], =, (A x)/(x^2 - p)}], ,, , p>0}]

racpravaimm[A_, p_][x_] := (A x)/(x^2 - p)

racpravaimm[1, 1][x]

R (x) = ( x)/(x^2 - 1)

[Graphics:../HTMLFiles/racionalne_80.gif]

racpravaimm[1, p][x]

R (x) = ( x)/(x^2 - p) p = 5, 4, ..., 1

[Graphics:../HTMLFiles/racionalne_88.gif]

racpravaimm[A, p][x]

R (x) = (A x)/(x^2 - p ) p = 5, 4, ..., 1          A = 3, 1, -1, -3

[Graphics:../HTMLFiles/racionalne_111.gif]

Created by Mathematica  (November 27, 2003)