{VERSION 6 0 "IBM INTEL NT" "6.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "assume(n,integer);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "ans:=int((2/Pi)*abs(cos(x ))*cos(n*x),x=0..Pi);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ansG,$**\" \"%\"\"\"%#PiG!\"\",&F(F**$)%#n|irG\"\"#F(F(F*-%$cosG6#,$*(F/F*F)F(F.F (F(F(F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "assume(k,integer );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "subs(n=2*k,ans):simpl ify(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$**\"\"%\"\"\")!\"\",&F&F& %#k|irGF&F&%#PiGF(,&F&F(*&F%F&)F*\"\"#F&F&F(F&" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 30 "subs(n=2*k+1,ans):simplify(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "5 0 0" 0 }{VIEWOPTS 1 1 0 2 1 1805 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }