Дан массив осадков за каждый день июля (31 день) .Определить в какую десятидневку выпало наибольшее количество осадков .

или имеется в виду в какой девятидневке в сумме выпало наибольшее число осадков?

эта программа ищет в какой девятидневке находится день с максимальным количеством осадков и выводи эту девятидневку.

const N = 4; {количество девятидневок в 31 числе}var a: array [1..31]  of integer;{заранеее заполненный}    i, max, d : integer;begin  max:=0;for i:= 1 to 31 do  if a[i] > max then {нахождение максимального числа и запонимание его девятидневки}    begin      max := a[i];      d:= i mod N;    end;  writeln(d){вывод девятидневки}end.