{VERSION 4 0 "IBM INTEL NT" "4.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "T ext Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 0" -1 256 1 {CSTYLE "" -1 -1 "Courier" 1 11 128 0 128 1 2 1 2 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 0 1 2 2 2 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 5 "Raute" }}{PARA 0 "" 0 "" {TEXT -1 72 " \+ c" }}{PARA 0 "" 0 "" {TEXT -1 81 " \+ delta ------- gamma" }}{PARA 0 "" 0 "" {TEXT -1 87 " / \+ /" }}{PARA 0 "" 0 "" {TEXT -1 83 " \+ d e / f \\ \+ b" }}{PARA 0 "" 0 "" {TEXT -1 94 " \+ / / " }}{PARA 0 "" 0 "" {TEXT -1 72 " alp ha ------- beta" }}{PARA 0 "" 0 "" {TEXT -1 66 " \+ a" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "gr ad:=x->180*x/Pi:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "bogen:= x->Pi*x/180:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 16 "1. Aufg. Raute" }}{PARA 0 "" 0 "" {TEXT -1 20 " gegeben: beta, f" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "beta:=130: f:=5: # eingeben" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "alpha:=180-beta;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "a_quadrat:=evalf(f^2/(2*(1-cos(bogen(alpha))))):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a:=sqrt(a_quadrat);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "hoehe:=evalf(a*sin(bogen(alp ha))):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "x:=evalf(a*cos(bo gen(alpha))): # H\366henabschnitt, entspricht q" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 28 "e:=sqrt( (a+x)^2+hoehe^2 );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "a_plus_x:=a+x:" }}}{EXCHG {PARA 0 "" 0 " " {TEXT -1 10 "Kontrolle:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "e:=eva lf(sqrt(2*a^2-2.*a^2*cos(bogen(beta)) ) ):" }}{PARA 2 "" 1 "" {TEXT -1 1 "\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 2 "" 1 "" {TEXT -1 1 "\n" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 16 "2. Au fg. Raute" }}{PARA 0 "" 0 "" {TEXT -1 19 " gegeben beta, e" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "beta:=110.: e:=8: # gegeben" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "alpha:=180-beta;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "a_quadrat:=evalf(e^2/(2*(1.-cos(bog en(beta))))):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a:=sqrt(a_ quadrat);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "hoehe:=evalf(a *sin(bogen(alpha))):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "x:= evalf(a*cos(bogen(alpha))): # H\366henabschnitt, entspricht q" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "f:=sqrt( (a-x)^2+hoehe^2 ); " }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 10 "Kontrolle:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "f:=evalf(sqrt(2*a^2-2.*a^2*cos(bogen(alpha))) ): " }}}}{MARK "15 1 0" 19 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }