<!--- Filename should be: topic_story_anwserformat.Rmd --->
  
```{r,  echo = FALSE, results = "hide"}
library("exams")
include_supplement('zweiwuerfel.num', recursive=TRUE)
library("exams.forge")
instruction <- NULL
library("extraDistr")
d      <- distribution("dunif2", min=1, max=6) 
border <- sample(3:11, size=1)
ptype  <- "point"
sc     <- num_result(prob1(d, border), 4)
```

Question
========

```{r, error=TRUE, child=instruction}
```

Bei einem Monopolyspiel wird die Zahl der Felder, die Ihre Spielfigur vorrücken darf/muss, durch den Wurf mit zwei (idealen) Würfeln bestimmt. Wie groß ist die Wahrscheinlichkeit, dass Sie beim nächsten Wurf genau `r border` Felder vorrücken können?

```{r, child='zweiwuerfel.num'}
```

Meta-information
================
extype: num
exsolution: `r sc$fx[1]`
extol: `r sc$tolerance`
exname: `r knitr::current_input()`
