View of /trunk/NationalProblemLibrary/UVA-Stew5e/setUVA-Stew5e-C03S01-DerivPolyExps/3-1-13.pg

    1 ##DESCRIPTION
    2 ##Calculus: Differentiation
    3 ##ENDDESCRIPTION
    4 
    5 ##KEYWORDS('calculus', 'differentiation')
    6 ##Tagged by YJ
    7 
    8 ## DBsubject('Calculus')
    9 ## DBchapter('Differentiation')
   10 ## DBsection('Derivatives of Polynomials and Exponential Functions')
   11 ## Date('5/26/2005')
   12 ## Author('Jeff Holt')
   13 ## Institution('UVA')
   14 ## TitleText1('Calculus')
   15 ## EditionText1('5e')
   16 ## AuthorText1('Stewart')
   17 ## Section1('3.1')
   18 ## Problem1('13')
   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 = 1;
   32 
   33 $a1 = random(2,16,1);
   34 $b1 = random(2,5,1);
   35 $funct1 = "($a1**$b1)*($b1)*(x**($b1-1)) ";
   36 
   37 TEXT(EV2(<<EOT));
   38 If \( f(x) =  ($a1 x)^$b1 \), find \( f'( x ) \).
   39 $PAR
   40 \( f'(x) \) = \{ans_rule(30) \}
   41 $BR
   42 EOT
   43 
   44 $ans = $funct1;
   45 ANS(fun_cmp($ans));
   46 
   47 ENDDOCUMENT();        # This should be the last executable line in the problem.