Помогите.Информатика 9 класс.Составьте программу которая формирует массив из 16 случайных целых чисел от -20 до 20 и находит элемент с нулевым значением

// PASCAL var   a: array [1..16] of integer;   i: integer; b: boolean; begin   randomize;   for i := 1 to 16 do a[i] := random(-20, 20);   for i := 1 to 16 do     if a[i] = 0 then begin       if b then write(', ');       write(i, '-й ');       b := true;     end;   if b then writeln('элемент(ы) равен(ны) нулю') else writeln('В массиве нету элементов, равных нулю.'); end.