| … | |
… | |
| 26 | "PGchoicemacros.pl", |
26 | "PGchoicemacros.pl", |
| 27 | "PGanswermacros.pl", |
27 | "PGanswermacros.pl", |
| 28 | "PGauxiliaryFunctions.pl" |
28 | "PGauxiliaryFunctions.pl" |
| 29 | ); |
29 | ); |
| 30 | |
30 | |
| 31 | TEXT(&beginproblem); |
31 | TEXT(beginproblem()); |
| 32 | $showPartialCorrectAnswers = 1; |
32 | $showPartialCorrectAnswers = 1; |
| 33 | |
33 | |
| 34 | $a = random(2,20,1); |
34 | $a = random(2,20,1); |
| 35 | |
35 | |
| 36 | TEXT(EV2(<<EOT)); |
36 | TEXT(EV2(<<EOT)); |
| … | |
… | |
| 43 | $BR |
43 | $BR |
| 44 | |
44 | |
| 45 | EOT |
45 | EOT |
| 46 | |
46 | |
| 47 | $ans = (1-$a*log(2))/2**($a+1); |
47 | $ans = (1-$a*log(2))/2**($a+1); |
| 48 | &ANS(std_num_cmp($ans)); |
48 | ANS(num_cmp($ans)); |
| 49 | |
49 | |
| 50 | ENDDOCUMENT(); |
50 | ENDDOCUMENT(); |