geoR
-----
Syntax: geoR(x,p)

    x eine beliebige reelle Zahl
    p eine natrliche Zahl, die den Exponenten 
      darstellt

Ergebnis: - 'FALSE', wenn p keine natrliche Zahl          
             ist
          - die errechnete Summe

Zweck: 
Berechnet die geometrische Reihe einer reellen 
Zahl x bis zur Potenz p.

geometrische Reihe:
1+x+x**2+x**3+x**4+x**5+....+x**n fr x ist 
eine beliebige reelle Zahl und n ist eine natrliche Zahl

Formel:
fr x<>1: ((1-(x**(n+1)))/(1-x)
fr x=1 folgt 1+1+1+1+1+...+1 (n-mal) => Ergebnis =n

Beispiel:
say geoR(4,5)
Ausgabe: 1365

erg=geoR(3,-1)
Ausgabe: 'FALSE'

erg=geoR(6,10)
Ausgabe: 72559411
