Предмет: География, автор: Аноним

1. Какие воздушные массы вторгаются зимой на территорию Средней Азии? В чем их особенности?​

Ответы

Автор ответа: faina065
17

Ответ:

арктические воздушные массы, сильное снижение температуры воздуха до - 35

faina065: ну давай попробую
Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Технология, автор: OnlySmile1
Бутерброды и горячие напитки сообщение. Требования приготовления бутербродов, способы нарезки. Правила хранения горячих напитков
1 год назад
Предмет: Английский язык, автор: роси2
сделай подписи к рисункам
1 год назад
Предмет: Українська мова, автор: супервіка1
текст-розповідь про населенний пункт села де ти живеш( село новомиргород)
1 год назад
Предмет: Информатика, автор: Яна999
Помогите пожалуйста! Язык VBA. Не могу задать замену окончательной суммы.
Задача:
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 100 включительно. Опишите на VBA алгоритм, который находит сумму элементов массива меньших 80 и при этом, кратных 5, а затем заменяет каждый такой элемент на число, равное найденной сумме. Гарантируется, что хотя бы один такой элемент в массиве есть. В качестве результата необходимо вывести измененный массив, каждый элемент выводится с новой строчки. Например, для исходного массива из шести элементов:
14
15
27
20
95
4
программа должна вывести следующий массив
14
35
27
35
95
4

Sub program()
Dim a(1 To 30) As Integer, i As Integer, Sum As Integer

For i = 1 To 30
a(i) = Int(100 * Rnd)
Sheets("Лист1").Cells(i, 1) = a(i)
Next i

Sum = 0
For i = 1 To 30
If a(i) < 80 And a(i) Mod 5 = 0 Then
Sum = Sum + a(i)
a(i) = Sum
End If
Sheets("Лист1").Cells(i, 2) = a(i)
Next i

Sheets("Лист1").Cells(1, 3) = Sum
End Sub
8 лет назад
Предмет: Физика, автор: tassik69
Решите задачу пожалуйста
8 лет назад