procedure print_args(sequence args)
    for i = 1 to length(args) do
        puts(1,args[i])
        puts(1,' ')
    end for
end procedure

print_args({"Mary", "had", "a", "little", "lamb"})