🚀 go-pugleaf

>         s = 1 + a
> S nie równa się 1+a ale raczek s+a

W międzyczasie doszedłem do tego i zmodyfikowałem całą pętlę:
-------------------------------------
n=2
s=1
w=1
a = (5 ^ n * x ^ n) / silnia(n)          ' oblicz pierwszy wyraz
      Do
        a = (5 ^ n * x ^ n) / silnia(n)        ' oblicz pierwszy argument
        If a > eps Then                        ' jeśli wyraz jest większy od eps 
to dodaj go do szeregu
          If (w Mod 2 = 1) Then                ' jeśli obliczony wyraz jest 
krokiem nieparzystym "w" to....
            a = -a                             ' ustaw wyraz "a" jako ujemny
          End If
            s = s + a                          ' dodaj wyraz do sumy szeregu
          If Abs(f - s) > eps Then             ' jeśli różnica wartości funkcji 
i szeregu jest większa epsilon to licz kolejny wyraz szeregu
            n = n + 2                          ' zwiększ potęgę n o 2
            a = (5 ^ n * x ^ n) / silnia(n)    ' oblicz kolejny wyraz "a" ze 
wzoru
            w = w + 1                          ' zwiększ licznik wyrazów o 1
            s = s + a                          ' dodaj wyraz do sumy szeregu
          End If
          If Abs(f - s) <= eps Then            ' jeśli różnica wartości 
bezwzględnych funkcji i szeregu jest mniejsza lub równa epsilon to licz ostatni 
wyraz szeregu
            n = n + 2
            a = (5 ^ n * x ^ n) / silnia(n)
            w = w                                   ' nie zwiększaj w
            s = s + a
          End If
        End If
      Loop While Abs(f - s) < eps
-------------------------------------
Ale dalej nie liczy więcej niż 2 obiegi pętli i dalej jest to bardzo niedokładne 
:(