Что напечатает программа? Pascal
ans := a[1];
tmp := 1;
for i := 2 to 25 do
if a[i] < ans then
ans := a[i]
tmp := i;
writeln(tmp);

---