> A / B; > is_in (A,B); > is_in (4.5,B); > K:=[1.,5.];> C:=[1.,2.]; F:=[5.,7.]; > C * X = F; > X:=F / C;> A:=[4.,5.]; B:=[14.,22.]; C:=[9.,9.]; A * X^2 + B * X + C =0;> if is_in(disc, positiveINT) then X1:=(([-1.,-1.] * B) + ((disc) **(1/2))) / (2 * A); X2:=(([-1.,-1.] * B) - ((disc) **(1/2))) / (2 * A); |
> libname:="d:\\Maple\\Maple 9.5\\intpakX\\lib", libname
|
| bet | 61/78 | | Sana | 22.07.2021 | | Hajmi | 7,05 Mb. | | #15506 |
Bu sahifa navigatsiya:
- > A / B; > is_in (A,B); > is_in (4.5,B); > K:=[1.,5.];
- > C:=[1.,2.]; F:=[5.,7.]; > C * X = F; > X:=F / C;
- > A:=[4.,5.]; B:=[14.,22.]; C:=[9.,9.]; A * X^2 + B * X + C =0;
- > if is_in(disc, positiveINT) then X1:=(([-1.,-1.] * B) + ((disc) **(1/2))) / (2 * A); X2:=(([-1.,-1.] * B) - ((disc) **(1/2))) / (2 * A);
> libname:="d:\\Maple\\Maple 9.5\\intpakX\\lib", libname;
> with(intpakX);
Interval arifmetik amallar bajarish.
> A:=[2.,4.]; B:=[4.,5.];
> A &+ B;
> A &- B;
> A &* B;
> A &/ B;
> is_in (A,B);
> is_in (4.5,B);
> K:=[1.,5.];
> A &+ B &/ K;
> A &+ (B &/ K);
Koeffitsiyentlari interval sonlardan iborat bo’lgan chiziqli tenglama quyidagi usulda yechiladi:
> C:=[1.,2.]; F:=[5.,7.];
> C * X = F;
> X:=F &/ C;
Koeffitsiyentlari interval sonlardan iborat bo’lgan kvadrat tenglama quyidagi usulda bajariladi:
Misol-1.
> A:=[4.,5.]; B:=[14.,22.]; C:=[9.,9.];
A * X^2 + B * X + C =0;
> disc:=(B &**2) &- (4 &* A &* C);
positiveINT:=[0., infinity];
nepositiveINT:=[-infinity,0.];
> if is_in(disc, positiveINT) then X1:=(([-1.,-1.] &* B) &+ ((disc) &**(1/2))) &/ (2 &* A);
X2:=(([-1.,-1.] &* B) &- ((disc) &**(1/2))) &/ (2 &* A);
|
| |
