View of /trunk/NationalProblemLibrary/TCNJ/TCNJ_Determinants/problem3.pg

    1 ## DESCRIPTION
    2 ## Linear Algebra
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('determinant' 'matrix')
    6 ## Tagged by tda2d
    7 
    8 ## DBsubject('Linear Algebra')
    9 ## DBchapter('Matrices')
   10 ## DBsection('Determinants')
   11 ## Date('')
   12 ## Author('')
   13 ## Institution('TCNJ')
   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(
   23 "PG.pl",
   24 "PGbasicmacros.pl",
   25 "PGchoicemacros.pl",
   26 "PGanswermacros.pl",
   27 "PGgraphmacros.pl",
   28 "PGmatrixmacros.pl",
   29 "PGnumericalmacros.pl",
   30 "PGauxiliaryFunctions.pl"
   31 );
   32 
   33 TEXT(beginproblem());
   34 $showPartialCorrectAnswers = 1;
   35 
   36 BEGIN_TEXT
   37 
   38 \{ mbox([ 'If \(A=\)', display_matrix([[k, 0, 0], [0, 1, 0], [0, 0, 1]]) ]) \}
   39 $BR
   40 \{ mbox( 'then \(\det\,(A)= \ \)', ans_rule(20) ) \}
   41 
   42 END_TEXT
   43 
   44 ANS(str_cmp("k"));
   45 
   46 ENDDOCUMENT();       # This should be the last executable line in the problem.