В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах (Dat[1] – данные за понедельник, Dat[2] – за вторник и т. д. Определите число, которое будет напечатано в результате выполнения следующего алгоритма, записанного на трёх алгоритмических языках. Алгоритмический язык Бейсик Паскаль алг нач целтаб Dat[1:7] цел k, m, day Dat[1]:=7; Dat[2]:=9 Dat[3]:=10; Dat[4]:=8 Dat[5]:=6; Dat[6]:=7 Dat[7]:=6 day:= 1; m:=Dat[1] нц для k от 2 до 7 если Dat[k] < m то m:=Dat[k]; day:=k все кц вывод day кон DIM Dat(7) AS INTEGER Dat(1)=7: Dat(2)=9 Dat(3)=10: Dat(4)=8 Dat(5)=6: Dat(6)=7 Dat(7)=6 day = 1: m=Dat(1) FOR k = 2 TO 7 IF Dat(k) < m THEN m=Dat(k) day=k END IF NEXT k PRINT day END Var k, m, day: integer; Dat: array[1..7] of integer; Begin Dat[1]:=7; Dat[2]:=9; Dat[3]:=10; Dat[4]:=8; Dat[5]:=6; Dat[6]:=7; Dat[7]:=6; day:= 1; m:=Dat[1]; for k:=2 to 7 do begin if Dat[k] < m then begin m:=Dat[k]; day:=k end end; write(day); End.