Программа обрабатывает одномерный целочисленный мас- сив Dat: i Dat[i] 2 1 3 70 80 90 4 100 5 80 6 7 8 9 10 40 40 70 80 90 Заполните трассировочную таблицу и определите, какие числа будут выведены в результате выполнения следую- щего фрагмента программы. k :=1 ; m: dat[k]; for i := 2 to 10 do if dat[i] < m then begin k m da + [i] < m m:= dat[i] ; k :=i end; writeln('m', m); writeln c' * k = 1 , k);