Номер 3.83, ГДЗ по информатике за 9 класс к сборнику задач и упражнений Босовой

a[1..30] - массив количества миль, пройденных за каждый деньi - номер текущего дняs1, s2, s3 - суммы путей, пройденных за каждые из трех десятидневок.max - максимальное из s1, s2, s3k - номер десятидневки.program Z83;vara: array [1..30] of integer;i, k, s1, s2, s3, max: integer;begins1 := 0; s2 := 0; s3 := 0;for i := 1 to 30 do beginreadln(a[i]);if i <= 10 then s1 := s1 + a[i]else if i <= 20 then s2 := s2 + a[i] else s3 := s3 + a[i];end;max := s1; k := 1;if max < s2 then begin max := s2; k := 2 end;if max < s3 then begin max := s3; k := 3 end;writeln('max=', max, ' k =', k)end.