```{r, echo=FALSE}
library('exams')
include_supplement('variation.num', recursive=TRUE)
library("exams.forge")
instruction <- NULL
k <- sample(3:6, 1)
n <- sample(10:20, 1)
without <- 1
type    <- "V"
sc      <- num_result(if(without) variation(n, k) else variation(n, k, TRUE), digits=0)
```

Question
=======

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

Ein Maler bietet einer Galerie `r n` Bilder für eine Ausstellung an. An der dazu vorgesehenen Wand finden aber nur `r k`
Bilder gleichzeitig Platz. Wie viele verschiedene Möglichkeiten zur Hängung der Bilder gibt es?

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

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