• HELP ME!!   задан массив  размерностью (10х10) элементов. присвоить элементам массиваизначение функции Y=cos(x^0.25-0.5x^0.5+0.25x^0.75) при изменении аргумента от 6 с шагом 0.25.
    найти максимальный элемент массива. сформулировать  новый массив путем вычеркивания строки и столбца, на которых расположен максимальный элемент.
    вывести на экран в формате 3 знака после запятой:
    1. исходный массив
    2. полученный массив
    3. искомые элементы ( если они есть)
    предесмотреть возможность вывода на экран и в файл....

Ответы 5

  • а это какой язык програмирования?
    • Автор:

      albaxtpd
    • 6 лет назад
    • 0
  • VBA Excel, если на компьютере стоит офис, то и есть этот язык. Открой Word, или лучше Excel /сервис/ макрос /редактор VBA
    • Автор:

      francis14
    • 6 лет назад
    • 0
  • а в паскаль это тяжко переделать?
  • Паскалем не пользуюсь уже 20 лет
  • Sub Rab() Dim A(10, 10) X0 = 6 h = 0.25 Max = -1000 x = X0 For i = 1 To 10            For k = 1 To 10                       A(i, k) = Cos(x ^ 0.25 - 0.5 * x ^ 0.5 + 0.25 * x ^ 0.75)                        If Max < A(i, k) Then                                     Max = A(i, k)                        im = i                        km = k                End If                 x = x + h     Next k Next i ' Вывод матрицы For i = 1 To 10            For k = 1 To 10                     Cells(i, k) = Int((0.0005 + A(i, k)) * 1000) / 1000  'Округление А до 3 знака             Next k Next i ' вывод обрезаной матрицы For i = 1 To 10            For k = 1 To 10                      If i = im Then                      Else                               If k = km  Then                  Else                      Cells(i + 12, k) = Int((0.0005 + A(i, k)) * 1000) / 1000                  End If              End If        Next k Next i End Sub
    • Автор:

      creep
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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