View of /trunk/NationalProblemLibrary/270/setDerivatives8RelatedRates/s2_8_3.pg

    1 ## DESCRIPTION
    2 ##  Calculus
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('Calculus','Derivatives')
    6 ## Tagged by dgt5v
    7 
    8 ## DBsubject('Calculus')
    9 ## DBchapter('Differentiation')
   10 ## DBsection('Related Rates')
   11 ## Date('')
   12 ## Author('')
   13 ## Institution('')
   14 ## TitleText1('')
   15 ## EditionText1('')
   16 ## AuthorText1('')
   17 ## Section1('')
   18 ## Problem1('')
   19 
   20 DOCUMENT();        # This should be the first executable line in the problem.
   21 
   22 loadMacros(
   23 "PG.pl",
   24 "PGbasicmacros.pl",
   25 "PGchoicemacros.pl",
   26 "PGanswermacros.pl",
   27 "PGauxiliaryFunctions.pl"
   28 );
   29 
   30 TEXT(beginproblem());
   31 $showPartialCorrectAnswers = 0;
   32 
   33 $a1 = random(1,5,1);
   34 $b1 = random(1,5,1);
   35 $c1 = random(1,5,1);
   36 
   37 $deriv1 = -$c1*$c1*$b1/$a1;
   38 
   39 TEXT(EV2(<<EOT));
   40 Let \[ xy = $a1 \]
   41  and let \[ \frac { dy }{ dt } = $b1 \]
   42 Find \( \frac { dx }{ dt }  \) when  \( x = $c1 \). $BR
   43 \{ans_rule(20) \}
   44 EOT
   45 
   46 $ans = $deriv1;
   47 ANS(num_cmp($ans));
   48 
   49 ENDDOCUMENT();        # This should be the last executable line in the problem.