import strutils proc main = let N = parseInt readLine stdin discard readLine stdin var a = newSeq[int](N) for i, ai in a: let n = parseInt readLine stdin a[i] = n echo max(a) - min(a) main()