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

Вопрос школьника по предмету Информатика

Дан массив из 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;

begin

for i:=1 to 8 do

if a[i]=2 then writeln(‘Pozitciya elementa ravnogo 2 = ‘,i);

end.

Массив заполняется с клавиаутры

var

a: array[1..8] of integer;

i:integer;

begin

for i:=1 to 8 do

readln(a[i]);

for i:=1 to 8 do

if a[i]=2 then writeln(‘Pozitciya elementa ravnogo 2 = ‘,i);

end.