[npl] / trunk / NationalProblemLibrary / ASU-topics / setSolveEquations / zhu8.pg Repository:
ViewVC logotype

View of /trunk/NationalProblemLibrary/ASU-topics/setSolveEquations/zhu8.pg

Parent Directory Parent Directory | Revision Log Revision Log


Revision 268 - (download) (annotate)
Sat Jun 3 14:35:45 2006 UTC (6 years, 11 months ago) by gage
File size: 1132 byte(s)
 Cleaned code with convert-functions.pl script

    1 ##Solve for an equation
    2 ## Algebra equation
    3 ##ENDDESCRIPTION
    4 
    5 
    6 ## KEYWORDS('Equations and Inequalities')
    7 ## Tagged by ynw2d
    8 
    9 ## DBsubject('Algebra')
   10 ## DBchapter('Equations and Inequalities')
   11 ## DBsection('Algebraic and Graphical Solutions of Equations')
   12 ## Date('')
   13 ## Author('')
   14 ## Institution('ASU')
   15 ## TitleText1('')
   16 ## EditionText1('')
   17 ## AuthorText1('')
   18 ## Section1('')
   19 ## Problem1('')
   20 
   21 
   22 
   23 DOCUMENT();        # This should be the first executable line in the problem.
   24 
   25 loadMacros(
   26 "PG.pl",
   27 "PGbasicmacros.pl",
   28 "PGchoicemacros.pl",
   29 "PGanswermacros.pl",
   30 "PGauxiliaryFunctions.pl",
   31 "PGasu.pl",
   32 "extraAnswerEvaluators.pl"
   33 );
   34 
   35 TEXT(beginproblem());
   36 $showPartialCorrectAnswers = 0;
   37 
   38 $a = random(1,10,1);
   39 $b = non_zero_random(1,10,1);
   40 
   41 TEXT(EV2(<<EOT));
   42 Solve the following equation.
   43 $BR
   44 \[ \sqrt{11-x^2} - \frac{2}{\sqrt{11-x^2}} = 1 \]
   45 $BR
   46 Answer: \{ans_rule(35) \}
   47 $BR
   48 $BBOLD Note: $EBOLD
   49  If there is more than one answer, write them separated by commas (e.g., 1, 2).
   50 EOT
   51 $ans1 = 7**0.5;
   52 $ans2 = - 7**0.5;
   53 ANS(number_list_cmp("$ans1,$ans2"));
   54 
   55 
   56 ENDDOCUMENT();        # This should be the last executable line in the problem.;
   57 
   58 

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9