| … | |
… | |
| 15 | ## TitleText1('Precalculus') |
15 | ## TitleText1('Precalculus') |
| 16 | ## EditionText1('3') |
16 | ## EditionText1('3') |
| 17 | ## AuthorText1('Stewart, Redlin, Watson') |
17 | ## AuthorText1('Stewart, Redlin, Watson') |
| 18 | ## Section1('6.5') |
18 | ## Section1('6.5') |
| 19 | ## Problem1('29') |
19 | ## Problem1('29') |
|
|
20 | |
| 20 | DOCUMENT(); # This should be the first executable line in the problem. |
21 | DOCUMENT(); # This should be the first executable line in the problem. |
| 21 | |
22 | |
| 22 | loadMacros( |
23 | loadMacros( |
| 23 | "PG.pl", |
24 | "PG.pl", |
| 24 | "PGbasicmacros.pl", |
25 | "PGbasicmacros.pl", |
| 25 | "PGchoicemacros.pl", |
|
|
| 26 | "PGanswermacros.pl", |
26 | "PGanswermacros.pl", |
| 27 | "PGauxiliaryFunctions.pl" |
27 | "PGauxiliaryFunctions.pl" |
| 28 | ); |
28 | ); |
| 29 | |
29 | |
| 30 | TEXT(beginproblem()); |
30 | TEXT(&beginproblem); |
| 31 | $showPartialCorrectAnswers = 0; |
31 | $showPartialCorrectAnswers = 0; |
| 32 | |
32 | |
| 33 | $s=random(600,700,5); |
33 | $s=random(600,700,5); |
| 34 | |
34 | |
| 35 | TEXT(EV2(<<EOT)); |
35 | BEGIN_TEXT |
| 36 | A pilot flies in a straight path for 1 h 30 min. She then makes a course |
36 | A pilot flies in a straight path for 1 hour and 30 min. She then makes a course |
| 37 | correction, heading 10 degrees to the right of her original course, |
37 | correction, heading 10 degrees to the right of her original course, |
| 38 | and flies 2 h in the new direction. If she maintains a constant speed of |
38 | and flies 2 hours in the new direction. |
|
|
39 | If she maintains a constant speed of |
| 39 | $s mi/h, how far is she from her starting position? |
40 | $s miles per hour, how far is she from her starting position? |
| 40 | $BR |
41 | $BR |
| 41 | Your answer is \{ans_rule(15)\} mi; |
|
|
| 42 | $BR |
42 | $BR |
| 43 | EOT |
43 | Answer: \{ans_rule(55)\} miles |
|
|
44 | END_TEXT |
| 44 | |
45 | |
| 45 | $ans1=sqrt((1.5*$s)**2+(2*$s)**2-2*(1.5*$s)*(2*$s)*cos($PI*170/180)); |
46 | $s15 = 1.5*$s; |
| 46 | |
47 | |
| 47 | ANS(num_cmp($ans1)); |
48 | ANS(num_cmp("sqrt($s15^2+(2*$s)^2-2*$s15*2*$s*cos(pi*170/180))")); |
| 48 | |
49 | |
| 49 | ENDDOCUMENT(); # This should be the last executable line in the problem. |
50 | ENDDOCUMENT(); # This should be the last executable line in the problem. |