> And where do you think the phrase 'My Secret Password' would be stored
> other than memory?
so you have to override variables after use? like
var pwd: array[0..15] of char;
xpwd: string;
[...]
readln(pwd);
xpwd := encrypt(pwd);
pwd := '123456789012345'; // override
[...]
???