diff -r 1e6eca42d90b -r 8778d23fef92 cw2_marking/c2.sc --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/cw2_marking/c2.sc Mon Feb 03 12:34:38 2025 +0000 @@ -0,0 +1,36 @@ +// for testing compilation +import $file.cw02 +import cw02._ + +val ufile = """ +// Collatz series +// +// needs writing of strings and numbers; comments + +bnd := 1; +while bnd < 101 do { + write bnd; + write ": "; + n := bnd; + cnt := 0; + + while n > 1 do { + write n; + write ","; + + if n % 2 == 0 + then n := n / 2 + else n := 3 * n+1; + + cnt := cnt + 1 + }; + + write " => "; + write cnt; + write "\n"; + bnd := bnd + 1 +} +""" + + +println(tokenise(ufile))