% math Mathematica 3.0 for Solaris Copyright 1988-97 Wolfram Research, Inc. -- Motif graphics initialized -- In[1]:= Cos[a*x]*Sech[b*x] Out[1]= Cos[a x] Sech[b x] In[2]:= Series[%,{x,0,5}] 2 2 4 2 2 4 -a b 2 a a b 5 b 4 6 Out[2]= 1 + (--- - --) x + (-- + ----- + ----) x + O[x] 2 2 24 4 24 In[3]:= Quit$B>e5-$N=PNO$N$&$A!":G=i$N(B % math (Mathematica $B$N5/F0(B) $B$H(B In[
$B:G=i$K4X?t$r@_Dj$9$k!#(B
$B:#2s$O(B 5 $B
$B$3$N7W;;$r $B$b(B
$B$b(B
Mathematica $B$K$O$"$i$+$8$a(B
Cos[x], Sech[x] $B$H$7$FAH$_9~$^$l$F$$$k!#(B
$B$=$7$F(B Series[
,{
,
,
}] $B$,%F%$%i!
$B$,$=$NJQ?t!"(B
$B$,E83+$NCf?4!"(B
$B$,E83+$r9T$J$&% $B$H;XDj$9$k$HD>A0$N<0$,;H$o$l$k!#(B
Next: $B$3$NJ8=q$K$D$$$F(B...
Up: $B@Q!">&!"9g@.4X?tEy$N%F%$%i!
2002$BG/(B 7$B7n(B 30$BF|(B