Create factorial.scm

Time for some Scheme training :)