View of /trunk/rochester_problib/setAlgebra08LinearEqns/sw1_6_74.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 \( P = 2l+2w \) for \(w\).
   24 $BR
   25 Your answer is : \{ans_rule(20) \}
   26 $BR
   27 $BBOLD Note: $EBOLD The answer is case sensitive!
   28 END_TEXT
   29 
   30 $ans = "(P-2*l)/2";
   31 
   32 ANS(fun_cmp($ans, var=>['P','l']));
   33 
   34 ENDDOCUMENT();        # This should be the last executable line in the problem.