• 2. в массиве g хранится информация о количестве осадков, выпавших за каждый день июля. Определить дату самого дождливого дня.
    3. В массиве Y1,Y2,...Y12 и Z1,Z2,...Z12 хранится информация о среднемесячных температурах за каждый месяц 2008 и 2009 года. Определить какой год был теплее.

Ответы 1

  • // PascalABC.NET 3.2, сборка 1407 от 18.03.2017// Внимание! Если программа не работает, обновите версию!begin  var g:=ArrRandom(31,0,40); g.Println;  Writeln(g.IndexMax+1)end.Пример38 34 15 11 2 33 12 39 12 0 32 23 7 18 22 31 0 6 19 15 24 37 26 12 7 9 20 25 21 18 208// PascalABC.NET 3.2, сборка 1407 от 18.03.2017begin  var y:=ReadArrReal('2008:',12);  var z:=ReadArrReal('2009:',12);  var d:=y.Average-z.Average;  if d>0 then Writeln('2008 теплее')  else    if d<0 then Writeln('2009 теплее')    else Writeln('Оба года имеют одинаковую среднюю температуру')end.Пример2008: -12.7 -10.4 -2.3 5.7 12.5 19.6 24.1 22.8 19.9 17.6 8.2 -7.42009: -15.2 -9.4 1.6 7.1 13.5 17.1 26.3 21.4 17.5 14.2 10.1 -12.62008 теплее
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years