Мультимедиа: геометрия, графика, кино, звук
В программе достаточно изменить лишь
Пример 8
Вспоминаем, наконец, об оставшихся 10 графиках. В программе достаточно изменить лишь начальный порядковый номер.
Block[{n,m=5,omega=l/7}, Show[GraphicsArray[ Table[Table[gg[n=30+(a-1)*m+b],{b, m}], {a, 2}]] ] ]
А вот и сами графики.
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий