Uebung Teil 3 zu Mathematika - T H E I S - Formel

hn = 10r = 5vpkt = 0.015S = 0.25T = 0.001t = 1000k = 0.0001
sigma = (((r^2)*S)/(4*T*t))wsig1 = 
      -Log[1.78*sigma] + sigma - ((sigma^2)/(2*2!)) + 
        ((sigma^3)/(3*3!)) - ((sigma^4)/(4*4!)) + 
        ((sigma^5)/(5*5!)) - ((sigma^6)/(6*6!))wsig2=-Log[1.78*sigma]+sigma+(∑_(n = 2)^100)(((-1))^(n + 1))*((sigma^n)/(n*n!))
wsig3=-Log[1.78*sigma]+(∑_(n = 1)^100)(((-1))^(n + 1))((sigma^n)/(n*n!))
s=hn - (Sqrt[(hn^2) - ((vpkt*wsig2)/(2*π*k))])

hn = 10r = 5vpkt = 0.015S = 0.25T = 0.001t = 1000\(InputForm\`k = 0.0001
\)sigma = (((r^2)*S)/(4*T*t))\(InputForm
    \`wsig1 = 
      \(-Log[1.78*sigma]\) + sigma - sigma\^2\/\(2*\(2!\)\) + 
        sigma\^3\/\(3*\(3!\)\) - sigma\^4\/\(4*\(4!\)\) + 
        sigma\^5\/\(5*\(5!\)\) - sigma\^6\/\(6*\(6!\)\)\)\(InputForm
    \`wsig2 = 
      \(\(-Log[1.78*sigma]\) + sigma + 
          ∑\+\(n = 2\)\%100\((\(-1\))\)\^\(n + 1\)*
              sigma\^n\/\(n*\(n!\)\)
s = 
        hn - \@\(hn\^2 - \(vpkt*wsig2\)\/\(2*π*k\)\)\)\)