View of /trunk/NationalProblemLibrary/UVA-Stat/setStat212-Homework03/stat212-HW03-08.pg

    1 ## DESCRIPTION
    2 ##  Statistics: Descriptive statistics
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('statistics', 'descriptive statistics')
    6 ## NAW tagged this problem.
    7 
    8 ## DBchapter('What is Statistics?')
    9 ## DBsection()
   10 ## Date('6/8/2005')
   11 ## Author('Nolan A. Wages')
   12 ## Institution('UVA')
   13 ## TitleText1('Statistics for Management and Economics')
   14 ## EditionText1('6')
   15 ## AuthorText1('Keller, Warrack')
   16 ## Section1()
   17 ## Problem1()
   18 
   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 "PGnumericalmacros.pl",
   28 "PGstatisticsmacros.pl",
   29 "PGauxiliaryFunctions.pl"
   30 );
   31 
   32 TEXT(beginproblem());
   33 $showPartialCorrectAnswers = 0;
   34 install_problem_grader(~~&std_problem_grader);
   35 
   36 $mc[1] = new_multiple_choice();
   37 $mc[1]->qa('If you roll an unbiased die 50 times, you should expect an even number to appear: ',
   38     'on the average, 25 out of the 50 rolls'
   39 );
   40 $mc[1]->extra(
   41     'at least twice in the 50 rolls',
   42     'on every other roll',
   43     '25 out of the 50 rolls'
   44 );
   45 
   46 
   47 $mc[2] = new_multiple_choice();
   48 $mc[2]->qa('Which of the following is a requirement of the probabilities assigned to the
   49 outcomes \(O_i\):',
   50     '\(0 \leq P(O_i)\leq 1\) for each i '
   51 );
   52 $mc[2]->extra(
   53     '\(P(O_i) \leq 0\)',
   54     '\(P(O_i) \geq 1\)',
   55     '\(P(O_i) = 1 + P(O_i^C)\)'
   56 );
   57 
   58 
   59 $mc[3] = new_multiple_choice();
   60 $mc[3]->qa('Which of the following statements is correct given that the events
   61 A and B  have nonzero probabilities?',
   62     'A and B cannot be both independent and mutually exclusive'
   63 );
   64 $mc[3]->extra(
   65     'A and B can be both independent and mutually exclusive',
   66     'A and B are always independent',
   67     'A and B are always mutually exclusive'
   68 );
   69 
   70 
   71 
   72 $mc[4] = new_multiple_choice();
   73 $mc[4]->qa('If an experiment consists of five outcomes with \(P(O_1) = 0.10\),
   74 \(P(O_2) = 0.20\), \(P(O_3) = 0.30\), \(P(O_4) = 0.40\), then \(P(O_5)\) is:',
   75     '0'
   76 );
   77 
   78 $mc[4]->extra(
   79     '0.50',
   80     '0.25',
   81     '1'
   82 );
   83 
   84 
   85 $mc[5] = new_multiple_choice();
   86 $mc[5]->qa('Of the last 500 customers entering a supermarket,
   87 50 have purchased a loaf of bread.  If the relative frequency approach for assigning probabilities
   88 is used, the probability that the next customer will purchase a loaf of bread is:',
   89     '0.10'
   90 );
   91 $mc[5]->extra(
   92     '0.50',
   93     '0.90',
   94 );
   95 
   96 $mc[5]->makeLast(
   97     'None of the above answers is correct'
   98 );
   99 
  100 
  101 $a = random(1,5,1);
  102 $b = random(1,5,1);
  103 while ($a == $b) {
  104     $b = random(1,5,1);
  105 }
  106 
  107 
  108 BEGIN_TEXT
  109 $PAR
  110 \{ $mc[$a]->print_q() \}
  111 
  112 \{ $mc[$a]->print_a() \}
  113 $PAR
  114 \{ $mc[$b]->print_q() \}
  115 
  116 \{ $mc[$b]->print_a() \}
  117 $PAR
  118 
  119 END_TEXT
  120 
  121 ANS(radio_cmp($mc[$a]->correct_ans));
  122 ANS(radio_cmp($mc[$b]->correct_ans));
  123 
  124 ENDDOCUMENT();       # This should be the last executable line in the problem.