View of /trunk/rochester_problib/setIntegrals23Work/eva5_2.pg

    1 #DESCRIPTION
    2 #Work ns6_5_3.pg
    3 #ENDDESCRIPTION
    4 #KEYWORDS('Force', 'Work')
    5 
    6 DOCUMENT();        # This should be the first executable line in the problem.
    7 
    8 loadMacros(
    9 "PG.pl",
   10 "PGbasicmacros.pl",
   11 "PGchoicemacros.pl",
   12 "PGanswermacros.pl",
   13 "PGauxiliaryFunctions.pl"
   14 );
   15 
   16 TEXT(&beginproblem);
   17 $showPartialCorrectAnswers = 1;
   18 
   19 $A = non_zero_random(1,7,1);
   20 $b = non_zero_random(.1, .6, .1);
   21 $c = non_zero_random(.6, 1.1, .1);
   22 
   23 BEGIN_TEXT
   24 A force of \($A\) pounds is required to hold a spring stretched
   25 $b feet beyond its natural length. How much work (in foot-pounds)
   26 is done in stretching the spring from its natural length to $c feet
   27 beyond its natural length?
   28 \{ans_rule(35)\}
   29 
   30 END_TEXT
   31 
   32 $answer = .5*$A*$c**2/$b;
   33 &ANS(std_num_cmp($answer) );
   34 ENDDOCUMENT();        # This should be the last executable line in the problem.
   35