Предмет: Русский язык, автор: alimvahabov13

Помогите пожалуйста ​

Приложения:
Karolina0000999: 1. О

Ответы

Автор ответа: KMSFT
1

Осмотреться вокруг (проверочное слово - осмОтр)

Припасти продуктов (проверочное слово - запАс)

дрожать от холода (дрОжь)

подсказать дорогу (подскАзка)

гордиться успехами (гОрдость)

поспешить в школу (спЕшка)

пробежать мимо (бЕг)

вытянуть шею (вытЯгивать)

встречаться с друзьями (встрЕча)

подкормить животных (кОрм)

откатиться в сторону (кАтится)

вырезать ножницами (рЕзать)

держаться на ножках (выдЕрживать)

не отвлекаться на мелочи (отвлЁк)

alimvahabov13: спасибо
Автор ответа: diyorakhakimova9
1

Ответ:

  1. осмотреться
  2. припасти
  3. дрожать
  4. подсказать
  5. гордиться
  6. поспешить
  7. пробежать
  8. вытянуть
  9. встречаться
  10. подкормить
  11. откатиться
  12. вырезать
  13. держаться
  14. не отвлекаться
alimvahabov13: спасибо
Предыдущий вопрос
Следующий вопрос
Интересные вопросы
Предмет: Технология, автор: OnlySmile1
Бутерброды и горячие напитки сообщение. Требования приготовления бутербродов, способы нарезки. Правила хранения горячих напитков
2 года назад
Предмет: Английский язык, автор: роси2
сделай подписи к рисункам
2 года назад
Предмет: Українська мова, автор: супервіка1
текст-розповідь про населенний пункт села де ти живеш( село новомиргород)
2 года назад
Предмет: Информатика, автор: Яна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 лет назад