View of /trunk/NationalProblemLibrary/270/setDerivatives2Formulas/s2_2_22.pg

    1 ## DESCRIPTION
    2 ##   Differentiation Laws
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('Derivative')
    6 ## Tagged by nhamblet
    7 
    8 ## DBsubject('Calculus')
    9 ## DBchapter('Differentiation')
   10 ## DBsection('Differentiation Formulas')
   11 ## Date('')
   12 ## Author('')
   13 ## Institution('ASU')
   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 = 1;
   32 
   33 $a1 = random(2,7,1);
   34 $b1 = random(2,8,1);
   35 $c1 = random(2,7,1);
   36 $d1 = random(2,6,1);
   37 $n1 = random(3,7,1);
   38 $x1 = random(1,5,1);
   39 
   40 $deriv1 = -$b1*$x1**(-2) -2*$c1*$x1**(-3);
   41 $funct1 = "-$b1*x**(-2) -2*$c1*x**(-3)";
   42 
   43 TEXT(EV2(<<EOT));
   44 If \( f(x) =  $a1 + \frac {$b1 } {x} + \frac {$c1 } {x^2 }\), find \( f'( x ) \).
   45 $BR $BR \{ans_rule(48) \}
   46 $BR
   47 EOT
   48 
   49 $ans = $funct1;
   50 ANS(fun_cmp($ans));
   51 
   52 TEXT(EV2(<<EOT));
   53 Find \( f'( $x1 ) \).
   54 $BR $BR \{ans_rule(48) \}
   55 $BR $BR
   56 EOT
   57 
   58 $ans = $deriv1;
   59 ANS(num_cmp($ans));
   60 
   61 ENDDOCUMENT();        # This should be the last executable line in the problem.