Xor шифрование Pascal
 

Здравствуйте, всем. Прошу создать программу кодирования/декодирования тестового фала методом Xor шифрования. Код шифрования должен запрашиваться с клавиатуры, а текст браться из файла и записываться в новый.
Заранее благодарю!