Matematica

1) Grafique las funciones
a)
>> x=-3*pi:pi/100:3*pi;
y=x.*sin(x);
plot (x,y)
>>

b)
x=linspace(-15,15,1000);y=(-x.^2+1).*((-7<=x)&(x<=-4))+(-x).*((-4<x)&(x<0))+(x.^2-1).*((0<=x)&(x<7));
plot(x,y,'.'),gridon,title('Funcion definida a trozos')

2) Grafique las ecuaciones
a)
>> x=[-10:.1:10];
y=(1)./(2.*x.^2-3.*x);
plot(x,y)Warning: Divide byzero.
>>

b)
x=[-1000:.1:1000];
y=(5.*x.^2-3.*x);
plot(x,y)

c)
>> x=[-5:.1:5];
y=(1)./(x.^2+2*x);
plot(x,y)
>>

3) Efectué las siguientes operacionesa)
A=[0 -1;3 2]

A =
0 -1
3 2

B=[1 2 3;-1 1 -1]

B =
1 2 3
-1 1 -1

>> A*B
ans =

1 -1 1
1 8 7>>

b)

>> A=[1 2;3 4;5 6]

A =
1 2
3 4
5 6

>> B=[2 1 1;-2 0 1;0 0 0]
B =
2 1 1
-2 0 1
0 0 0>> A'
ans =

1 3 5
2 4 6

>> A'*(B)

ans =

-4 1 4
-4 2 6
>>

c)
>> A=[1 3 4;0 -1 1;3 2 1]

A =
13 4
0 -1 1
3 2 1

>>inv(A)

ans =

-0.1667 0.2778 0.3889
0.1667 -0.6111 -0.0556
0.1667 0.3889 -0.0556
>>

4) sistemasa)
X0=input('valor de X0=');
Y0=input('valor de Y0=');
Z0=input('valor de Z0=');
R1E=input('Resultado Primera Ecuacion=');
X1=input('valor de X1=');
Y1=input('valor de Y1=');
Z1=input('valorde Z1=');
R2E=input('Resultado Segunda Ecuacion=');
X2=input('valor de X2=');
Y2=input('valor de Y2=');
Z2=input('valor de Z2=');
R3E=input('Resultado Tercera Ecuacion=');A=[X0,Y0,Z0;X1,Y1,Z1;X2,Y2,Z2];
b=[R1E;R2E;R3E];
ValorXYZ=inv(A)*b
solucion
>> X0=input('valor de X0=');
Y0=input('valor de Y0=');
Z0=input('valor de Z0=');
R1E=input('Resultado Primera Ecuacion=');...