Факториал числа

# Вариант 1

F := 1;
for(N,0,16,
   N print;
   "! = " print;
   F println;
   F := F * (N+1);
);

# Вариант 2

factorial := method(number,
  if(number == 0,
    1,
    number * factorial(number - 1)
  )
)
factorial(5) print