progs/fun2/sqr.fun
changeset 854 c9e2568d4729
parent 820 9d5e4fa0c64d
equal deleted inserted replaced
853:851d8c00f033 854:c9e2568d4729
     2 
     2 
     3 def sqr(x: Int) : Int = x * x;
     3 def sqr(x: Int) : Int = x * x;
     4 
     4 
     5 def all(n: Int) : Void = {
     5 def all(n: Int) : Void = {
     6   if n <= Max
     6   if n <= Max
     7   then print_int(sqr(n)) ; all(n + 1)
     7   then { print_int(sqr(n)) ; new_line(); all(n + 1) }
     8   else skip()
     8   else skip()
     9 };
     9 };
    10 
    10 
    11 all(0)
    11 all(0)
    12  
    12