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


Пример 7



Пример 7




Теперь нарисуем 2 ряда развернутых циклоид. (Это графики с 20 по 30.)
Block[(n,m=5,omega=l/7), Show[GraphicsArray[ Table[Table[gg[n=20+(a-1)*m+b],{b,m}],{a,2}]]]]
Вы увидите следующее.








Начало  Назад  Вперед



Книжный магазин