Программа обрабатывает одномерный целочисленный массив 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);