Мультимедиа: геометрия, графика, кино, звук


              

В конце вы увидите следующее.



Пример 5


Чтобы начертить графики 16 и 17, в программе изменяется лишь m и начальный порядковый номер.
Block[{n,m=2,omega=l/7}, Show[GraphicsArray[ Table[Table[gg[n=15+(a-1)*m+b],{b,m}],{a,!)]]]]
В конце вы увидите следующее.

Содержание  Назад  Вперед





Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий