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


              

2 ряда развернутых циклоид.



Пример 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}]]]]
Вы увидите следующее.

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