Gostaria de escrever uma função que receba uma string e um separador e que divida
a string em duas outras strings. Trate adequadamente as condições de erro.
Exemplo: Divide(?Jones^Sam^IV^Houston?, ?^?, st1, st2) faz com que st1 fique com
o valor ?Jones? e st2 com ?Sam^IV^Houston?.
Cumprimentos