View of /trunk/rochester_problib/setAlgebra08LinearEqns/sw1_6_71.pg

    1 #DESCRIPTION
    2 ##  Algebra problem: Solving a equation
    3 ##ENDDESCRIPTION
    4 
    5 ##KEYWORDS('algebra', 'equations with symbols')
    6 
    7 DOCUMENT();        # This should be the first executable line in the problem.
    8 
    9 loadMacros(
   10 "PG.pl",
   11 "PGbasicmacros.pl",
   12 "PGchoicemacros.pl",
   13 "PGanswermacros.pl",
   14 "PGauxiliaryFunctions.pl"
   15 );
   16 
   17 TEXT(beginproblem());
   18 
   19 $showPartialCorrectAnswers = 1;
   20 
   21 
   22 BEGIN_TEXT
   23 Solve the equation \( PV = nRT \) for \(R\).
   24 $BR
   25 Your answer is : \{ans_rule(20) \}
   26 $BR
   27 $BBOLD Note: The answer is case sensitive. P, V and T are capital letters!!!$EBOLD
   28 END_TEXT
   29 
   30 $ans = "P*V/(n*T)";
   31 
   32 ANS(fun_cmp($ans, var=>['P','V','n','T']));
   33 
   34 ENDDOCUMENT();        # This should be the last executable line in the problem.