задайте массив из 5 случайных элементов выведите на экран сумму элементов и сами элементы (паскаль)

спасибо)

vara: array [1..10] of integer;i:integer;sum:integer;beginFor i:=1 to 5 do  begin  a[i]:=random(201)-100;  write(a[i]); write(' ');end;for i := 1 to 5 do  sum := sum + a[i];  write('Сумма элементов массива = ', sum);end.