--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/cwtests/cw02/collatz.while Sat Sep 04 14:08:00 2021 +0100 @@ -0,0 +1,8 @@ +write "Input a number "; +read n; +while n > 1 do { + if n % 2 == 0 + then n := n/2 + else n := 3*n+1 +}; +write "Yes"