Дан одномерный числовой массив. Вычислить в какой позиции массива встретилось число со значением a.

 const nx =30;var i,j,n,a:integer; M,B:array[1..nx] of integer; begin  Randomize; write('Введите число элементов массива n'); Read(n); write('Введите число а '); Read(a); for i:=1 to n do begin M[i]:= random(10)-5; if M[i] = a then begin j:=j+1;B[j]:=i;end; write(M[i]:3);end;writeln; for i:=1 to j do  writeln('Элемент массива совпадает а = ' ,a, ' на позиции ', B[i]);end.