View of /trunk/NationalProblemLibrary/Rochester/setTrig07Identity/p10.pg

    1 ## DESCRIPTION
    2 ## Precalculus: Trigonometric Identities
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('trigonometry','trigonometric identities')
    6 ## Tagged by cmd6a 5/11/06
    7 
    8 ## DBsubject('Trigonometry')
    9 ## DBchapter('Analytic Trigonometry')
   10 ## DBsection('Trigonometric Identities')
   11 ## Date('')
   12 ## Author('')
   13 ## Institution('Rochester')
   14 ## TitleText1('')
   15 ## EditionText1('')
   16 ## AuthorText1('')
   17 ## Section1('')
   18 ## Problem1('')
   19 
   20 
   21 DOCUMENT();        # This should be the first executable line in the problem.
   22 
   23 loadMacros(
   24 "PG.pl",
   25 "PGbasicmacros.pl",
   26 "PGchoicemacros.pl",
   27 "PGanswermacros.pl",
   28 "PGauxiliaryFunctions.pl"
   29 );
   30 
   31 # No partial credit on this problem, so we say:
   32 install_problem_grader(~~&std_problem_grader);
   33 
   34 TEXT(beginproblem());
   35 $showPartialCorrectAnswers = 0;
   36 
   37 $a = random(2,9,1);
   38 
   39 $aa = $a**2;
   40 
   41 
   42 qa(~~@questions, ~~@answers,
   43 "\(  \tan x \)" ,              "B",
   44 "\(  1 \)"  , "A",
   45 "\( \cot x \)"  ,              "D",
   46 "\( (\sec x)^2 \)"  ,              "C",
   47 "\( 1-(\cos x)^2 \)"  , "E"
   48       );
   49 
   50 # Now randomize the questions:
   51 @slice = &NchooseK(5,5);
   52 @shuffle = &shuffle(scalar(@slice));
   53 ($ans1, $ans2, $ans3, $ans4, $ans5) = @answers[@slice] ;
   54 
   55 TEXT(EV3(<<'EOT'));
   56 For each trigonometric expression A,B,C,D, E, choose the expression
   57 from  1,2,3,4,5 that completes a fundamental identity.
   58 Enter the appropriate letter (A,B,C,D, or E) in each blank.
   59 $BR
   60 $BR
   61 A. \( (\sin x )^2+(\cos x )^2 \)
   62 $BR
   63 B. \( \frac{\sin x}{\cos x} \)
   64 $BR
   65 C. \( (\tan x)^2 + 1 \)
   66 $BR
   67 D. \( \frac{\cos x}{\sin(x)} \)
   68 $BR
   69 E. \( (\sin x)^2 \)
   70 $BR
   71 $BR
   72 $BR
   73 EOT
   74 TEXT(EV2(match_questions_list_varbox(5,@questions[@slice])));
   75 
   76 ANS(str_cmp($ans1),
   77  str_cmp($ans2),
   78  str_cmp($ans3),
   79  str_cmp($ans4),
   80  str_cmp($ans5));
   81 
   82 ##set $PG_environment{'textbook'} in webworkCourse.ph
   83 if (defined($textbook)) {
   84    if ($textbook eq "EllisGulick5") {
   85 BEGIN_TEXT
   86 $PAR
   87 
   88 END_TEXT
   89 }
   90 }
   91 
   92 
   93 ENDDOCUMENT();        # This should be the last executable line in the problem.
   94