--- a/progs/collatz.while Mon Jul 27 11:02:48 2020 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -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";