```{r, echo=FALSE}
library('exams')
include_supplement('kombination.num', recursive=TRUE)
library("exams.forge")
instruction <- NULL
k <- sample(3:6, 1)
n <- sample(8:15, 1)
without <- runif(1)>0.5
type    <- "K"
sc      <- num_result(if(without) combination(n, k) else combination(n, k, TRUE), digits=0)
```

Question
=======

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

Bei dem Spiel "Reise nach Jerusalem" sollen sich `r n` Kinder `r if(without) "genau einen" else "einen oder mehrere"` von `r k` Kochlöffeln schnappen, wenn die Musik aufhört zu spielen. Wie viele Ergebnismöglichkeiten gibt es?

```{r, child="kombination.num"}
```

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