М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
gramma116
gramma116
12.10.2020 23:14 •  Информатика

Даны векторы a и b , состоящие из семи компонентов. найти max(max(ai), max(bi), max(¦ai-bi¦), max(ai+bі),1) (с подпрограм)

👇
Ответ:
MILAVASSILYEVA
MILAVASSILYEVA
12.10.2020
Программа и пример её работы - в прилагаемом файле.
4,4(17 оценок)
Открыть все ответы
Ответ:
игорь800
игорь800
12.10.2020

E1 = 13.

Объяснение:

Так как мы перемещаем формулу на одну строку вверх, то меняются только значения, отвечающие за строку, а именно числа в формуле.

Перемещаем:

E1=СУММ(A$1:D1).

A$1 не меняется, так как это смешанная ссылка - если стоит знак $ перед каким-то значением, то оно не меняется. В данном случае $ стоит перед значением, отвечающим за строку, поэтому оно не поменялось при перемещении формулы.

Считаем итог:

Команда СУММ считает сумму чисел в заданном диапазоне. В нашем случае, диапазон равен [A$1:D1], т.е. суммируем всю первую строку.

E1 = СУММ(A$1:D1) = 5 + 3 + 4 + 1 = 13.

Получаем, что значение ячейки E1 равно 13.

4,7(40 оценок)
Ответ:
aliana77777
aliana77777
12.10.2020
Sub aaa()
    Dim i As Integer, j As Integer, d
    ReDim q(1 To 3, 1 To 2)
    For i = 1 To 3
        For j = 1 To 2
            q(i, j) = InputBox("Введите элемент (" + Str(i) + "," + Str(j) + ")")
        Next j
    Next i
    Cells(1, 1).Value = "Исходный массив"
    Range(Cells(2, 1), Cells(4, 2)).Value = q
    Cells(5, 1).Value = "Результирующий массив"
    For i = 1 To 3
        If q(i, 1) > q(i, 2) Then
            d = q(i, 1): q(i, 1) = q(i, 2): q(i, 2) = d
        End If
    Next i
    Range(Cells(6, 1), Cells(8, 2)).Value = q
End Sub
4,4(42 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ