Дан массив из 8 элементов 4:-2:-4:0:2:3:1:5 найти позицию элемента равного двум

Массив заполнен сразуconst a: array[1..8] of integer=(4,-2,-4,0,2,3,1,5);var i:integer;beginfor i:=1 to 8 doif a[i]=2 then writeln('Pozitciya elementa ravnogo 2 = ',i);end.Массив заполняется с клавиаутрыvara: array[1..8] of integer;i:integer;beginfor i:=1 to 8 doreadln(a[i]);for i:=1 to 8 doif a[i]=2 then writeln('Pozitciya elementa ravnogo 2 = ',i);end.