Annotation of loncom/homework/templates/SimpleMathResponseR.problem, revision 1.1
1.1 ! www 1: <problem>
! 2: <script type="loncapa/perl">
! 3: $mean=&random(4,9,0.1);
! 4: @args=$mean;
! 5: $answer="$mean,$mean,$mean would be a simple example";
! 6: </script>
! 7:
! 8: <startouttext />
! 9: Provide a list of 3 numbers (separated by commas) that has a mean value of $mean.
! 10: <endouttext />
! 11:
! 12: <mathresponse answerdisplay="$answer" cas="R" args="@args">
! 13:
! 14: <answer>x<-c(RESPONSE[1],RESPONSE[2],RESPONSE[3]);
! 15: abs(mean(x)-LONCAPALIST[1])<0.001
! 16: </answer>
! 17:
! 18: <textline readonly="no" size="50" />
! 19: </mathresponse>
! 20: </problem>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>