min:=a[1];
for i:=2 to N do 
 if a[i]<min then
	min:=a[i]

for i:=1 to N do
 if a[i]=min then 
	writeln(i);