2. в массиве g хранится информация о количестве осадков, выпавших за
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 20
8
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
begin
var y:=ReadArrReal('2008:',12);
var z:=ReadArrReal('2009:',12);
var d:=y.Average-z.Average;
if dgt;0 then Writeln('2008 теплее')
else
if dlt;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.4
2009: -15.2 -9.4 1.6 7.1 13.5 17.1 26.3 21.4 17.5 14.2 10.1 -12.6
2008 теплее
// Внимание! Если программка не работает, обновите версию!
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 20
8
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
begin
var y:=ReadArrReal('2008:',12);
var z:=ReadArrReal('2009:',12);
var d:=y.Average-z.Average;
if dgt;0 then Writeln('2008 теплее')
else
if dlt;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.4
2009: -15.2 -9.4 1.6 7.1 13.5 17.1 26.3 21.4 17.5 14.2 10.1 -12.6
2008 теплее
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов