RowBox[{RowBox[{RowBox[{4., , PRAVA, , RACIONALNA, , FUNKCIJA,   , R, (x)}], =, (A x)/(x^2 + q)}], ,, , q>0}]

racpravaim[A_, q_][x_] := (A x)/(x^2 + q)

racpravaim[1, 1][x]

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

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

racpravaim[A, q][x]

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

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

Created by Mathematica  (November 27, 2003)