Proteja con contraseña una expresión con la función Encrypt

Cifre un mensaje usando la simple contraseña "Shiver me timbers!", produciendo un EncryptedObject.

In[1]:=

secretMessage = Encrypt["Shiver me timbers!", "I buried a stash of gold somewhere."]

Out[1]=

Los datos ahora han sido cifrados.

In[2]:=

InputForm[secretMessage]

Out[2]//InputForm=

Descifre los datos usando la misma contraseña.

In[3]:=

Decrypt["Shiver me timbers!", secretMessage]

Out[3]=