↻ /prog/ Challenge [Vol. λfx.f x] ↻

THE CHALLENGE: Write a program that, given a number n, prints the expansion of (a+b)^n.

Example: 4 → a^4 + 4a^3b + 6a^2b^2 + 4ab^3 + b^4

HOWEVER: You must do the above in a language you do not have any experience with. Never programmed in Haskell before? Gather some documentation and go for it.

_{(Well, you're advised to do that. I can't possibly know whether or not you know a programming language.)}

>>1
Whatever:
sub fact {
  my $n = $_[0]--;
  $n *= $_[0] while $_[0]--;
  return $n;
}
Some other stuff too, but i'm tired. How about:
sub binom {
  my $n = shift;
  my $m = $n;
  print "a^$n + ";
  print ($n*($m-$n))."a^$n*b^".($m-$n)." + " while ($n--- 1);
  print "b^$m";
}
I don't know or care if it works.