Scheme while (39/48)

Scheme while