Modula-3 While Loop Example - Modula Typing CST Test