solution/cw5/sqr.fun
changeset 864 b5b1bc0a603b
child 869 81ee93b87258
equal deleted inserted replaced
863:d59bcff69998 864:b5b1bc0a603b
       
     1 val Max : Int = 10;
       
     2 
       
     3 def sqr(x: Int) : Int = x * x;
       
     4 
       
     5 def all(n: Int) : Void = {
       
     6   if n <= Max
       
     7   then { print_int(sqr(n)) ; new_line(); all(n + 1) }
       
     8   else skip()
       
     9 };
       
    10 
       
    11 all(0)
       
    12