Помогите,пожалуйста
9 чисел выбрасываются случайным образом из отрезка от - 2 до 10. Подсчитать сумму чисел > 2 и вывести на экран.

const N = 9;var a: array[1..N] of integer;i, sum: integer;beginsum := 0;for i := 1 to N do begina[ i ] := random(12)-2;write(a[i]:4);if a[ i ] > 2 then sum := sum + a[ i ];end;writeln();writeln();write(' Сумма всех чисел > 2: ', sum);end.