Определите,что будет напечатано в результате выполнения следующего алгоритма,записанного на трех языках программирования.Помогите плз)

var  Ves: array[1..14] of integer;  i, n: integer;begin  Ves[1] := 25; Ves[2] := 21; Ves[3] := 23; Ves[4] := 28;Ves[5] := 30;Ves[6] := 25;Ves[7] := 31;  Ves[8] := 28;Ves[9] := 25;Ves[10] := 28;Ves[11] := 30;Ves[12] := 27;Ves[13] := 26;Ves[14] := 24;   n := 0;  for i := 1 to 14 do   begin    if Ves[i] > 26 then      n := n + 1  end;  writeln(n);end.Ответ7