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