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)) ; all(n + 1)

     8   else skip()

     9 };

    10 

    11 all(0)

    12