Нц для k от 1 до 10
если Dat[k] >= m то
m := Dat[k]
n := k
По этому выражению получается мы должны найти наибольшее Dat[k], здесь их 2, Dat[3]=10 и Dat[8]=10, т.к. оба равны 10.
Подставляем это в выражение, которое я написал выше. Начнем с Dat[3]=10, т.к. 3 идет раньше 8.
Получим:
Если Dat[3] >=m то
m:=10
n:=3
Далее Dat[8]:
Если Dat[8]>=m (Которое собственно теперь равно 10), то
m:=10
n:=8
Больше 10 чисел нет, поэтому ответ будет 8.