View of /trunk/NationalProblemLibrary/Rochester/setVectors1space3D/UR_VC_1_1.pg

    1 ## DESCRIPTION
    2 ##   Distance from a Point to a Plane
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('Distance', 'Point', 'Plane')
    6 ## Tagged by nhamblet
    7 
    8 ## DBsubject('Calculus')
    9 ## DBchapter('Vectors and the Geometry of Space')
   10 ## DBsection('Three-Dimensional Coordinate Systems')
   11 ## Date('5/30/2000')
   12 ## Author('Joseph Neisendorfer')
   13 ## Institution('Rochester')
   14 ## TitleText1('')
   15 ## EditionText1('')
   16 ## AuthorText1('')
   17 ## Section1('')
   18 ## Problem1('')
   19 
   20 DOCUMENT();
   21 
   22 loadMacros(
   23 "PG.pl",
   24 "PGbasicmacros.pl",
   25 "PGchoicemacros.pl",
   26 "PGanswermacros.pl",
   27 "PGauxiliaryFunctions.pl"
   28 );
   29 
   30 TEXT(beginproblem());
   31 $showPartialCorrectAnswers = 0;
   32 
   33 $a = random(0, 10);
   34 $b = random(1, 10);
   35 $c = random(-10, 10);
   36 $ans = $b;
   37 
   38 BEGIN_TEXT;
   39 $PAR
   40 What is the distance from the point ($a, $b, $c) to the xz-plane?
   41 $BR
   42 Distance = \{ ans_rule() \}
   43 $BR
   44 END_TEXT
   45 ANS(num_cmp($ans));
   46 
   47 ENDDOCUMENT();