Scheme while (10/48)

Scheme while