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