>S:=[seq([seq([i,j,A[i,j]],j=1..8)],i=1..8)]:
surfdata(S,axes=frame);
Бу мисолда А массив бир-бирига киргизилган 2 та цикл билан тўлдирилган. Maple функцияси rand (1 … 100) процедурасини яратади. rnd ( ), унда 1 дан 100 гача бўлган тасодифий сонлар тўпланади. Matrixplot функцияси heights = histogram параметри билан уч ўлчовли гистограмма ясайди.
Cylinderplot функциясидан фойдаланиш.
> with(plots): cylinderplot(1,theta=0..2*Pi,z=-1..1, axes=frame);
Sphereplot функциясидан фойдаланиш.
> with(plots):sphereplot(1,theta=0..2*Pi,phi=0..Pi,axes=frame);
sphereplot((1.3)^z*sin(theta),z=-1..2*Pi, theta=0..Pi, style = patch, color = z, axes = frame);
Тенгламаларни ечиш. Тенгламалар ва тенгсизликлар тизими. Оддий тенглама ва тенгсизликларни ечиш учун аналогик усулда solve функциясидан фойдаланиш мумкин.
>solve(a*x^2+b*x+c=0,x);
Биринчи параметр сифатида тенглама ёзилса 2- сида ўзгарувчи ёзилади, ўзгарувчига нисбатан тенгламани ечинг. Агар ўнг тарафи 0 га тенг бўлса, унда ноль ва тенг белгисини ёзмаса ҳамям бўлади.
>solve(a*x^2+b*x+c,x);
Агар тенгламанинг ечими бир нечта бўлса, унда илдизлар жавоби кетма – кетликда ёзилади. Худди шундай тенгсизликни ҳам ечиш мумкин.
>solve(x^2+x>5,x);
Open - очиқ диапазон, яъни қавсда кўрсатилган жавоблар унга кирмайди. Агар solve фукциясининг биринчи параметри кўплик бўлиб, тенгламадан иборат бўлса, унда Maple бу кўпликни тизим деб кўриб чиқади.
>solve({x+5*y+z=1,2*x-y+4*z=4,x+2*y+2*z=12}, {x,y,z});
{z = 23,x = -42,y = 4}
Do'stlaringiz bilan baham: |