Maple tizimida tenglama va tengsizliklarni, tenglama va tengsizliklar sistemasini yechish

Загружено в:

20.09.2019

Скачано:

0

Размер:

344.5 KB

Скачать

Maple tizimida tenglama va tengsizliklarni, tenglama va tengsizliklar sistemasini yechish REJA: 1. Maple tizimida tenglamalarni yechish. 2. Maple tizimida tenglamalar sistemasini yechish. 3. Tengsizliklar va tengsizliklar sistemasini yechish. 4. Trigonometrik va transendent tenglamalarni yechish usullari.

Maple tizimida tenglama va tenglamalar sistemasini yechish Tenglama tushunchasi Maple tizimida mustaqil equation (tenglama) turi sifatidagi ma’lumot bo`lib, <ifoda1>=< ifoda2> ko`rinishida hosil qilinadi. Tenglama ma’lumot sifatida talqin qilinganligi tufayli, uning ustida turli xil amallar bajarish mumkin. Masalan, chap va o`ng qismlarini ajratib olib, ular ustida oddiy ifodalar uchun qo`llanilgan barcha komandalarni bajarish mumkin. Tenglama va tengsizliklar yoki ularning sistemalarini analitik yechish uchun: a) solve(<tenglama>, <o`zgaruvchi>); b) solve({<tenglama1>, < tenglama2>,...}, {<o`zgaruvchi1>, < o`zgaruvchi2>,...); komandalari qo`llaniladi. a) ko`rinishdagi komanda bitta tenglamani, b) ko`rinishdagi komanda esa tenglamalar sistemasini yechadi. Bitta tenglamani yechish komandasining natijasi yechim yoki yechimlar ketma-ketligi bo`ladi. Tenglamalar sistemasini yechadigan komandaning natijasi yechimlar to`plami ketma-ketligi bo`ladi. Agarda komandada o`zgaruvchi(o`zgaruvchilar) ko`rsatilmasa, u holda komanda tenglamada qatnashgan barcha noma’lumlarga nisbatan yechimlarni beradi. Agarda <tenglama> o`rniga <ifoda> berilsa, u holda <ifoda>=0 ko`rinishdagi tenglama deb qabul qilinadi. Oddiy tenglamalarni yechish Maple da tenglamalarni yechishning universal buyrug’i solve(eq,x) bo`lib, bu yerda eq – tenglama, x – o`zgaruvchi, qaysiki tenglamani yechimini bera oladigan. Bu buyruq to`la samarali bo`lishi uchun kiritish satrida ifoda to`la yoritilishi kerak. Masalan: > solve(a*x+b=c,x);a c b  Misol 1. x ni toping. 420 : ( 160 – 1000: x )=12

> solve(420/(160-1000/x)=12,x);8 Misol 2. Tenglamani yeching. 6,9 : 4,6 = x : 5,4 > solve((6.9/4.6=x/5.4),x); 8.099999999 Misol 3. 12 143 99 63 35 15 3       x x x x x x tenglamani yeching. > solve((x/3+x/15+x/35+x/63+x/99+x/143)=12,x); 26 Misol 4. 0 2 5,2 2 3 2 4 2 3       x x x tenglamani yeching. > solve(((3*x-2)/4+(2*x+3)/2-2.5*x+2)=0,x); 4. Agar tenglama bir necha yechimga ega bo`lsa, name buyrug’i orqali boshqa hisoblash amallarini bajarishda yechimlarni tanlab olamiz. Berilgan tenglamaning k- yechimini aniqlash uchun kvadrat qavslar ichida yechim tartibini ko`rsatish lozim: name[k] . Masalan: > x:=solve(x^2-a=0,x); a a x , :   > x[1]; a  > x[2]; a > x[1]+x[2]; 0 Misol 1. Tenglamani yeching. 0 2 2000 1998 2    x x

$> solve(1998*x^2-2000*x+2=0,x);1, 1 999 > x:=solve(1998*x^2-2000*x+2=0,x); x := 1, 1 999 > x[1]; 1 > x[2]; 1 999 Misol 2. 1x va 2x sonlari 0 6 2 3 2    x x tenglamaning ildizlari bo’lsa, ildizlari yig’indisi va ayirmasini toping. > x:=solve(3*x^2-2*x-6=0,x); x := 1 3 + 1 3 19 , 1 3 - 1 3 19 > x[1]; 1 3 + 1 3 19 > x[2]; 1 3 - 1 3 19 > x[1]+x[2]; 2 3 > x[1]-x[2]; 2 3 19 Tenglamalar sistemasini yechish Tenglamalar sistemasi solve ({ eq 1, eq 2,…},{ x 1, x 2,…}) , buyrug ’ I yordamida yechiladi , faqat aylana qavslar ichidagi 1- figurali qavs ichida tenglamalar , ikkinchi figurali qavs ichida esa tenglamaning o ` zgaruvchilari kiritiladi . Agar$

sizga tenglamaning yechimlari bilan bog’liq ravishda keyingi hisoblashlar kerak bo`lsa, solve komandasi name ning qandaydir nomini ifodalaydi. So ` ngra assign(name) buyrug ’ i uni to ` ldiradi . Shundan keyin yechimlar ustida matematik amallar bajarish mumkin. Masalan: > s:=solve({a*x-y=1,5*x+a*y=1},{x,y}); s :={2 2 5 5 , 5 1 a a y a a x       } > assign(s); simplify(x-y); 2 5 6 a Misol 1. Tenglamalar sistemasini yeching         0 2 23 25 32 2 y x y y x Maple dasturida yechish: > s:=solve({(x+y)/2-2*y/3=5/2, 3*x/2+2*y=0},{x,y}); s := y = -3, x = 4 { } Javob: (4, -3) Misol 2. (x,y) sonlar jufti      4 2 3 5 2 y x y x sistemaning yechimi bo’lsa, x – y ni toping. Maple dasturida yechish: > s:=solve({2*x-y=5,3*x+2*y=4},{x,y}); s := x = 2, y = -1 { } > assign(s);simplify(x-y); 3 Javob: x – y =3 Misol 3. Agar         6 3 15 3 45 3 x z y x y x bo’lsa, x+y+z nimaga teng. Maple dasturida yechish: > s:=solve({3*x+y=45, z+3*y=-15, 3*z+x=6},{x,y,z}); s := {z = (-24)/7, y = (-27)/7, x = 114/7} yoki

$        7 114 , 7 27 , 7 24 : x y z s> assign(s);simplify(x+y+z); 9 Javob: x + y + z = 9 Chiziqli va ikkinchi darajali tenglamalar sistemasining yechimini Maple tizimida osongina topish imkoniyati mavjud. Quyidagi Maple tizimida bajarilgan misollar yechimi bilan birgalikda keltirilgan. Misol 1. S istemadan y x ni toping       3 8 2 2 y x xy y x Maple dasturida yechish: > s:=solve({x*x+y*y+x*y=8, x+y=3},{x,y}); s := y = RootOf _Z 2 - 3 _Z + 1, label = _L1 ( ), x = -RootOf _Z 2 - 3 _Z + 1, label = _L1 ( ) + 3 { } > assign(s); simplify(x*y); 1 Javob: y x =1 Misol 2. Sistemaning yechimini toping.       3 1 2 2 2 y x xy y x Maple dasturida yechish: > s:=solve({x^2+y^2-2*x*y=1, x+y=3},{x,y}); s := y = 1, x = 2 { }, y = 2, x = 1 { } > s[1]; y = 1, x = 2 { } > s[2]; y = 2, x = 1 { } Javob: (2;1) va (1;2) Misol 3. Ushbu      6 32 2 y x y x tenglamalar sistemasidan x ni toping. Maple dasturida yechish: > s:=solve({x^2-y^2=6, x+y=3},{x,y});$ $     2 5 ,2 1 : x y s> assign(s); simplify(x); 5 2 Javob: x=2,5 Misol 4. Tenglamalar sistemasini yeching.     22 4 2y xy Maple dasturida yechish: > s:=solve({y+4=2, (x^2)*y=-2},{x,y}); s := y = -2, x = 1 { }, y = -2, x = -1 { } > s[1]; y = -2, x = 1 { } > s[2]; y = -2, x = -1 { } Javob: (-1; -2), (1; -2) Misol 4. Agar 5  y x va 7 xy bo’lsa, 3 3 xy y x  ning qiymati qancha bo’ladi? Maple dasturida yechish: > s:=solve({x-y=5, x*y=7},{x,y}); s := y = RootOf _Z 2 + 5 _Z - 7, label = _L1 ( ), x = RootOf _Z 2 + 5 _Z - 7, label = _L1 ( ) + 5 { } > assign(s); simplify(x^3*y+x*y^3); 273 Javob: 3 3 xy y x  =273 Misol 5. Agar 12 b a va 144 2   a ab bo’lsa, a ning qiymati qanchaga teng? Maple dasturida yechish: > k:=solve({a-b=12, (-a)*b+a^2=144}, {a,b}); k := a = 12 , b = 0 { } > assign(k); simplify(a); 12 Javob: a=12 Misol 6. Agar xy y xy x 2 4 4 2 2     va 12  y x bo’lsa, xy ning qiymatini toping.$ $Maple dasturida yechish: > k:=solve({x^2-4*x*y+y^2=4-2*x*y, x+y=12}, {x,y});k := y = 5, x = 7 { }, y = 7, x = 5 { } > assign(k); simplify(x*y); 35 Javob: xy = 35 Misol 7. 18 a b va 170 2 2  b a , ? ab Maple dasturida yechish: > t:=solve({b+a=18, a^2+b^2=170}, {a,b}); t := b = 7, a = 11 { }, b = 11 , a = 7 { }  assign(t); simplify(a*b); 77 Javob: 77 ab Misol 8.          851340710 z x zx z y yz y x xy tenglamalar sistemasidan x ni toping. Maple dasturida yechish: > S:=solve({x*y/(x+y)=10/7, y*z/(y+z)=40/13, z*x/(x+z)=5/8}, {x,y,z});        79 80 , 23 80 , 49 80 : x y z S > assign(S); simplify(x); 80 79 Javob: 79 80 x Tenglamalarning sonli yechimi Tenglamani sonli yechishda, berilgan transcendent tenglama analitik yechim bermasa, maxsus fsolve ( eq , x ) buyrug’idan foydalaniladi. Parametr xuddi solve dagi kabi ko`rsatiladi. Masalan: > x:=fsolve(cos(x)=x,x); x : = .7390851332$

Agar komanda berilgan tenglama(tenglamalar sistemasi)ning yechimini aniqlay olmasa, bo`sh yechim belgisi NULL ni beradi. Umuman, to`rtinchi darajadan yuqori bo`lgan tenglamalarning analitik yechimini topish qiyin bo`lganligi tufayli, Maple tizimi maxsus RootOf() funksiyasi yordamida tenglamaning ixtiyoriy yechimini belgilaydi. Misol: > eq:=x^5+x^3+1=0; := eq    x5 x3 1 0 > s:=solve(eq,x); s ( ) RootOf ,   _Z 5 _Z 3 1  index 1 ( ) RootOf ,   _Z 5 _Z 3 1  index 2 , , := ( ) RootOf ,   _Z 5 _Z 3 1  index 3 ( ) RootOf ,   _Z 5 _Z 3 1  index 4 , , ( ) RootOf ,   _Z 5 _Z 3 1  index 5 > evalf(s[1]);  .6366631068 .6647015651 I > solve(x=cos(x)); ( ) RootOf  _Z ( ) cos _Z Oxirgi komandaning natijasi z-cos( z)=0 tenglamaning ixtiyoriy yechimini ifodalaydi. _z belgi Maple tizimining hosil qilgan o`zgaruvchisi bo`lib, x ni o`rniga almashtirilgan. Index parametri yechimning nomerini ko`rsatadi. Tengsizliklar va tengsizliklar sistemasini yechish Oddiy tengsizliklarni yechish solve buyrug’i tengsizliklarni yechishda ham qo`llaniladi.Tengsizlikning yechimi o`zgaruvchining o`zgarish oralig’i bo`lgan interval ko`rinishida beriladigan tengsizlikning yechimi yarim o`qlarda bo`lsa, u/h RealRange(–  , Open( a )), ya’ni x  (–  , a ), а – ixtiyoriy son. Open so`zi interval ochiq chegara

$degan ma’noni anglatadi. Agar ushbu so`z bo`lmasa, tenglamalr to`plamida bu interval yopiqligini anglatadi.Masalan: > s:=solve(sqrt(x+3)<sqrt(x-1)+sqrt(x-2),x): > convert ( s , radical ); RealRange          , 21 3 2 Open Agar siz x  ( a , b ) ko ` rinishda ko ` rishni istamasangiz , berilagan o ` zgaruvchini a < x , x < b tipda bo ` lsa , figurali qavslarda ko ` rsatish kerak . Masalan : > solve(1-1/2*ln(x)>2,{x}); } , 0{ )2(   e xx Tengsizliklar sistemasini yechish solve buyrug’i yordamida tengsizliklar sistemasini ham yechish mumkin. Masalan: > solve({x+y>=2,x-2*y<=1,x-y>=0,x-2*y>=1},{x,y}); } 3 1, 2 1 { y y x    Misol 1. Tengsizliklar sistemasi nechta butun yechimga ega?       1 )1 (3 2 5 4 3 x x x Maple dasturida yechish: > solve({3+4*x>=5, 2*x-3*(x-1)>-1},x);     4 , 2 1 xx Javob: Tengsizliklar sistemasi 3 ta butun yechimga ega. Misol 2. Tengsizliklar sistemasini yeching.           x x x x x x 3 16 )7 (4 3 3 )1 ( 10 )1 ( 2 Maple dasturida yechish: > solve({x*(x+1)+10>(x+1)^2+3, 3*x-4*(x-7)>=16-3*x},x);  6 , 6    x x Misol 3. Tengsizliklar sistemasini yeching.          3 4 2 1 4 3 3 2 4 5 y y y y$ $Maple dasturida yechish: > solve({(y-5)/4<(2*y+3)/3, (4*y+1)/2<(y-4)/3},y);      10 11 , 5 27 y y Misol 4. Ushbu 96: 2976 32 9 314: 1296    x tengsizlikning barcha natural yechimlarini toping. Maple dasturida yechish: > solve({1256/314<9*x-32, 9*x-32<=2976/96},x);  7 , 4   x x Javob: Tengsizlikning natural yechimlari 5,6,7 Misol 5. Tengsizliklar sistemasining eng katta butun yechimini ko’rsating           x x x x x 2 1 5 8 2 0 2 45 Maple dasturida yechish: > solve({(x+5)/4-2*x>=0, x-(2*x-8)/5>=1-2*x},x);      7 5 , 13 3 x x Javob: Tengsizliklar sistemasining eng katta butun yechimi 0. Misol 6.           6 25 )1 5)(1 5( )1 6)(3 2( 12 2 2 x x x x x x x x tengsizliklar sistemasining butun sonlardan iborat yechimlari yig’indisini toping. Maple dasturida yechish: > solve({12*x^2-(2*x-3)*(6*x+1)>x, (5*x-1)*(5*x+1)-25*x^2>=x-6},x);      5 , 5 1 x x Javob: Tengsizliklar sistemasining butun sonlardan iborat yechimlari yig’indisi 15 ga teng. Misol 7.           1 42 1 4 3 ) 4)(3 ( ) 2)(2 ( x x x x x x tengsizliklar sistemasining butun sonlardan iborat yechimlari nechta? Maple dasturida yechish: > solve({(x+2)*(2-x)<(x+3)*(4-x), (3+x)/ 4+(1-2*x)/6>=1},x);  1 , 8    x x$ $Javob: T engsizliklar sistemasining butun sonlardan iborat yechimlari 7 ta. Trigonometrik va transendent tenglamalarni yechish usullari Rekurrent va funksional tenglamalarni yechish f butun funksiyaning eq tenglamasi uchun rsolve(eq,f) buyrug’I ishlatiladi. f(n) funksiya uchun bir qancha boshlang’ich shartlar berilishi mumkin, bunda bu rekurrent tenglama mos yechimga ega bo`ladi. Masalan : > eq:=2*f(n)=3*f(n-1)-f(n-2); )2 ( )1 ( 3 ) ( 2 :      n f n f n f eq > rsolve({eq,f(1)=0,f(2)=1},f); n      2 1 4 2 solve universal buyrug’idan funksional tenglamalarni yechishda foydalaniladi. Masalan: > F:=solve(f(x)^2-3*f(x)+2*x,f); F := proc ( x ) RootOf(_ Z ^2 - 3*_ Z + 2* x ) end Tenglama natijada oshkormas ko`rinishni oladi. Maple bunday yechimlar bilan ishlashi mumkin. Funksional tenglamaning oshkormas yechimi convert buyrug’I yordamida elementar funksiyaga keltirilib topiladi. Yuqorida ko`rib o`tilgan misolni oshkor ko`rinishda yechamiz: > f:=convert(F(x),radical); x f 8 9 2 1 2 3 :    Trigonometrik tenglamalarni yechish solve buyrug’i trigonometrik tenglamalarni yechish uchun qo`llanilib, [0;2  ] intervaldagi bosh yechimni ko`rsatadi To`la yechimni ko`rsatish uchun _ EnvAllSolutions := true davomiy buyrug’i qo`llaniladi.Masalan: > _ EnvAllSolutions := true :$ $> solve ( sin ( x )= cos ( x ), x );Z_ 4 1  ~ Maple da  _ Z ~ belgisi butun tipning o ` zgarmasini aniqlaydi , bu berilgan tenglama yechimi uchun n x     4/ : , n – butun son . Misol 1. Tenglamaning ( 0;2  ) oraliqqa tegishli yechimlarini toping. 2 2 cos x Maple dasturida yechish: > _EnvAllSolutions:=true: > solve(cos(x)=-sqrt(2)/2,x); 3 4 p - 3 2 p _B1~ + 2 p _Z2~ Misol 2.  2 sin cos 2 sin x x x   tenglamaning [ 0;2  ] kesmada nechta ildizi bor? Maple dasturida yechish: > _EnvAllSolutions:=true: > solve(sin(2*x)=(cos(x)-sin(x))^2); 1 12 p + p _Z3~ , 5 12 p + p _Z3~ Transendent tenglamalarni yechish Transendent tenglamani yechishda, yechim aniq ko`rinishda bo`lishi uchun solve buyrug’idan avval _ EnvExplicit := true buyrug ’ ini ifodalash kerak . > eq:={ 7*3^x-3*2^(z+y-x+2)=15, 2*3^(x+1)+ 3*2^(z+y-x)=66, ln(x+y+z)-3*ln(x)-ln(y*z)=-ln(4) }: > _EnvExplicit:=true: > s:=solve(eq,{x,y,z}): > simplify(s[1]);simplify(s[2]); { x =2, y =3, z =1}, { x =2, y =1, z =3}$ $Quyida keltirilgan ko’rsatkichli tenglama va tengsizliklarning yechimi Maple muhitida topilgan. Misol 1. Tenglamani yeching. 5,0 4 4 x Maple dasturida yechish: > eq:={4^(x-4)=0.5}; eq := 4 x - 4 ( ) = 0.5 { } > _EnvExplicit:=true: > s:=solve(eq,{x}); s := x = 3.500000000 { } Javob: x = 3,5 Misol 2. Tenglamani yeching. 2 5-x 49 4 3.5     Maple dasturida yechish: > eq:={3.5^(x-5)=(4/49)^2};      2401 16 5.3 : )5 (x eq > _EnvExplicit:=true: > s:=solve(eq,{x}); s := x = 1.000000000{ } Javob: x = 1 Misol 3. Tenglamaning ildizi 10 dan qancha kam? 7 1 1 9 27 3     x x Maple dasturida yechish: > eq:={3^(x+1)*27^(x-1)=9^7}; eq := 3x + 1 ( ) 27 x - 1 ( ) = 4782969 { } > _EnvExplicit:=true: > s:=solve(eq,{x}); s := x = 4 { } > assign(s); simplify(10-x);$ $6Javob: 6 Misol 4. Tenglamani yeching. 64 8 4 2 1 1 1 2      x x x Maple dasturida yechish: > eq:={(2^(2*x-1)*4^(x+1))/8^(x-1)=64};         64 8 4 2 : 1 1 1 2 x x x eq > _EnvExplicit:=true: > s:=solve(eq,{x}); s := x = 2 { } Javob: x = 2 Misol 5. 8 7   x x e e tenglamaning ildizlari yig’indisini toping. Maple dasturida yechish: > eq:={exp(x)+7*exp(-x)=8}; eq := ex + 7 e -x( ) = 8 { } > _EnvExplicit:=true: > s:=solve(eq,{x}); s := x = ln 7() { }, x = 0 { } Javob: x = ln 7 Misol 6. 0 48 2 3 2 4 2 4 1         x x x tenglamani yeching. Maple dasturida yechish: > eq:={4^(x+1)-2^(x+4)+3*(2^(x+2))+48=0}; eq := 4x + 1 ( ) - 2x + 4 ( ) + 3 2x + 2 ( ) + 48 = 0 { } > _EnvExplicit:=true: > s:=solve(eq,{x});                                  )2 ln( 47 2 1 2 1 ln , )2 ln( 47 2 1 2 1 ln : I x I x s$

Maple tizimida tenglama va tengsizliklarni, tenglama va tengsizliklar sistemasini yechish

20.09.2019

0

344.5 KB

Похожие