> restart:
> with(finance):
> N:=2;
                                N := 2
> S:=(N+1)*25000;
                              S := 75000
> R:=10000*N;
                              R := 20000
> r:=(13+0.1*N)*0.01;
                              r := .132
> R:=presentvalue(S,r,nperiods);
                                                  1
                       R := 75000 -------------
                                                 nperiods
                                         1.132

> solve(R=77500,nperiods); 
                             -.2644639570
Не могу понять почему мой результат отрицательный, значение r отображается без целого числа, значение R не выглядит следующим образом
                                   75000
                       R :=  -------------
                                           nperiods
                                  1.132