Scheme while (43/48)

Scheme while