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


Пример 71



Пример 71




построению почти не поддается: при изменении параметров PlotPoints->l000, PlotDivision->2500 в нем часто исчезают те или иные детали. Не удается его построить ни вот так
ImplicitPlott((х+4)^2+1-Sigm[1-у^2]) ((х+3)^2+у^2+2Sign[х+3]+1)

((2х+3)^2+у^2-1)((х^2-х)^2-Sign[1-у^2]+1) (у^2+Sign[х^2-х]+1) ((х-3)^2+у^2+2Sign[х-3]+1) ((х-2)^2+(у-1)^2+Sign[2-х]+Sign[y-1]+1) ((х^2-9х+20)^2-Sign[1-у^2]+1) ((y+Abs[x-4]+Abs[x-5])^2-Sign[(х-4)(21/4-х)]+1)==0, (х,-4,5}, PlotPoints->1000,PlotDivision->250];
ни вот так ImplicitPlott{(х+4)^2+1-Sign[1-у^2]==0,  (х+3)^2+y^2+2Sign[х+3]+1==0,  (2х+3)^2+у^2-1==0, (х^2-х)^2-Sign[1-у^2]+1==0, y^2+Sign[x^2-x]+l==0, (х-3)^2+y^2+2Sign[x-3]+l==0, (x-2)^2+(y-l)^2+Sign[2-x]+Sign[y-l]+l==0, (х^2-9х+20)^2-Sign[l-y^2]+l==0, (y+Abs[x-4]+Abs[x-5])^2-Sign[(x-4)(21/4-х)]+1==0}, {х,-4,5},PlotPoints->1000, PlotDivision->250];
В лучшем случае получаем кучу предупреждений и вот что.








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



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