Viktoromto
?>

ДЛЯ ОСОБО ТУПЫХ, СКАЖИТЕ КАК ЭТО ДЕЛАТЬ Используя текстовый редактор, подготовьте небольшой отчет на тему «Модели систем», выполнив два следующих задания.ЗАДАНИЕ 2. Модель состава системыИзобразите графическими средствами модель состава систем, рассмотренных в первом задании. Обоснуйте вашу модель с точки зрения ее назначения. Отметьте, какие составляющие системы в этой модели рассматриваются в качестве элементов, а какие в качестве подсистем.​

Информатика

Ответы

Strelkov-Roman1263
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

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

ДЛЯ ОСОБО ТУПЫХ, СКАЖИТЕ КАК ЭТО ДЕЛАТЬ Используя текстовый редактор, подготовьте небольшой отчет на тему «Модели систем», выполнив два следующих задания.ЗАДАНИЕ 2. Модель состава системыИзобразите графическими средствами модель состава систем, рассмотренных в первом задании. Обоснуйте вашу модель с точки зрения ее назначения. Отметьте, какие составляющие системы в этой модели рассматриваются в качестве элементов, а какие в качестве подсистем.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

modellisimo-a
titancore
ekaizer
anusha33325
maglevanyycpt
shhelina
Петренко1852
Константин Андрей
Александровна1685
migreen
Оксана Николаевич
Azarova Anastasiya1707
maxim-xx38
ntyremsk1
БеляковаСтаниславовна