View of /branches/UGA/2.2.1c.pg

    1 ## DESCRIPTION
    2 ##   Testing for Open Sets
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('Open Set', 'Ball')
    6 ##
    7 
    8 ## DBsubject('Calculus')
    9 ## DBchapter('')
   10 ## DBsection('')
   11 ## Date('8/22/2009')
   12 ## Author('Ted Shifrin')
   13 ## Institution('UGA')
   14 ## TitleText1('')
   15 ## EditionText1('')
   16 ## AuthorText1('')
   17 ## Section1('')
   18 ## Problem1('')
   19 
   20 DOCUMENT(); # This should be the first executable line in the problem.
   21 
   22 loadMacros("PG.pl",
   23            "PGbasicmacros.pl",
   24            "PGchoicemacros.pl",
   25            "PGanswermacros.pl",
   26            "PGauxiliaryFunctions.pl"
   27           );
   28 
   29 TEXT(beginproblem());
   30 $showPartialCorrectAnswers = 1;
   31 
   32 $a = random(-10, 10, 1);
   33 $b = random($a+1, $a+10, 1);
   34 
   35 $ans = ($b-$a)/sqrt(2);
   36 
   37 BEGIN_TEXT
   38 Given the point \(\mathbf a = (\)$a, $b\()\) in the set \( S = \lbrace (x,y): y \gt x\rbrace\), give the radius \(\delta\) of the largest ball \(B(\mathbf a,\delta)\) that is contained in \( S\). $BR
   39 \{ans_rule(10)\} $BR
   40 END_TEXT
   41 
   42 ANS(num_cmp($ans));
   43 
   44 
   45 ENDDOCUMENT();  # This should be the last executable line in the problem.