Помогите пожалуйста. Дан одноmерный массuв целыx чисeл из n элементов. Найти и вывести номера элемeнтов, заканчивaющиxся цифpoй 0. Вроде нужно в Pascal'e делать. Сама пробовала, а завтра уже сдавать, всю неделю мучалась, так и не поняла :(

const n = 20;var a: array[1..n] of integer;    i: integer;begin//заполнение массива //и вывод массива на экран  randomize;  writeln('элементы массива:');  for i:=1 to n do  begin    a[i]:=random(50);    write(a[i],' ');  end;  writeln;//обработка массива и вывод на экран//элементов, оканчивающихся на 0    for i:=1 to n do  if a[i] mod 10 = 0 then   writeln('номер элемента: ',i,'  значение: ',a[i]);end.