View of /trunk/NationalProblemLibrary/ma123DB/set1/s6_2_1.pg

    1 ##KEYWORDS('integral', 'volume')
    2 ##DESCRIPTION
    3 ##  Compute a volume of revolution
    4 ##ENDDESCRIPTION
    5 
    6 ## AmberHolden tagged
    7 ## Shotwell Cleaned
    8 
    9 ## DBsubject('Calculus')
   10 ## DBchapter('Applications of Integration')
   11 ## DBsection('Volumes')
   12 ## Date('6/3/2002')
   13 ## Author('')
   14 ## Institution('')
   15 ## TitleText1('Calculus Early Transcendentals')
   16 ## EditionText1('4')
   17 ## AuthorText1('Stewart')
   18 ## Section1('6.2')
   19 ## Problem1('1,2,3')
   20 
   21 
   22 DOCUMENT();        # This should be the first executable line in the problem.
   23 
   24 loadMacros(
   25 "PGbasicmacros.pl",
   26 "PGanswermacros.pl",
   27 "PGauxiliaryFunctions.pl"
   28 );
   29 
   30 TEXT(beginproblem());
   31 $showPartialCorrectAnswers = 1;
   32 
   33 $a=random(2, 9);
   34 $soln ="$a*$a*pi/5";
   35 
   36 BEGIN_TEXT
   37 
   38 Find the volume of the solid obtained by rotating the region bounded by
   39 \[ y=$a x^2, x = 1, y = 0, \]
   40 about the \(x\)-axis.
   41 
   42 $BR $BR Answer: \{ans_rule( 15) \}
   43 $BR
   44 END_TEXT
   45 ANS(num_cmp($soln));
   46 
   47 ENDDOCUMENT();        # This should be the last executable line in the problem.