Analisando o seguinte código escrito em linguagem Delphi, o que vai acontecer quando a função “Exemplo” for executada?

1. Procedure Exemplo;
2. var
3. ar: Array of Integer;
4. begin
5. SetLength(ar,3);
6.
7. ar[0] := 34;
8. ar[1] := 45;
9. ar[2] := 745;
10.
11. SetLength(ar,5);
12.
13. ar [3] := 561;
14. ar [4] := 99;
15. end;