version 1.1, 2009/04/18 23:43:54
|
version 1.2, 2009/07/06 17:12:47
|
Line 1
|
Line 1
|
<problem> |
<problem> |
|
|
<script type="loncapa/perl"> |
<script type="loncapa/perl"> |
$mean=&random(4,9,0.1); |
$mean=&random(4,9,0.1); |
@args=$mean; |
@args=$mean; |
Line 10 Provide a list of 3 numbers (separated b
|
Line 11 Provide a list of 3 numbers (separated b
|
<endouttext /> |
<endouttext /> |
|
|
<mathresponse answerdisplay="$answer" cas="R" args="@args"> |
<mathresponse answerdisplay="$answer" cas="R" args="@args"> |
|
<answer> |
<answer>x<-c(RESPONSE[1],RESPONSE[2],RESPONSE[3]); |
x<-c(RESPONSE[1],RESPONSE[2],RESPONSE[3]); |
abs(mean(x)-LONCAPALIST[1])<0.001 |
abs(mean(x)-LONCAPALIST[1])<0.001 |
</answer> |
</answer> |
|
<textline readonly="no" size="50" /> |
<textline readonly="no" size="50" /> |
|
</mathresponse> |
</mathresponse> |
|
|
</problem> |
</problem> |