PROGRAM GENESIS;

BEGIN
  WRITELN('In the beginning God created Adam.');
  WRITELN('--or was it Coleco?')
END.