Петя написал программу для поиска минимального числа в массиве, состоящем не более, чем из 100 целых элементов. Также известно, что каждое из чисел, хранящихся в массиве, по модулю не превосходит 500. Какое наименьшее число Петя может поставить вместо знака во чтобы программа работала корректно для любых входных данных (удовлетворяющих этим свойствам)?

var
arr: array[1..100] of longint;
i, n, ans: longint;

begin
readln(n);
for i := 1 to n do
read(arr[i]);
ans := ?;
for i := 1 to n do
if arr[i] < ans then
ans := arr[i];
writeln(ans);
end.