Add crypto-square exercise

How about putting this into a function?
```
  Normalised = normalise(String),
```
and 
```
normalise(String) -> [X || X <- string:to_lower(String), is_letter(X)].
```