1.- >> x = 0:pi/100:2*pi; y = sin(x.^4); plot(x,y)
2.- >> x=0:pi/100:2*pi;plot(3*cos(x)-2,3*sin(x)+1,'r'), grid on, axis equal
3.- x = -4:pi/100:4; y = (13-2*x)/3; y2 = 2*x-1; plot(x,y,x,y2) legend('(13-2*x)/3)','2*x-1')
4.- >> hold on x=linspace(pi/2,5*pi/2,4);plot(cos(x),sin(x)); x1=linspace(0,2*pi,100);plot(cos(x1),sin(x1),0.5*cos(x1),0.5*sin(x1)) hold off
5.- >> hold on x=linspace(0,2*pi,500);plot(2.5*cos(x),2.5*sin(x),'r*'); x1=linspace(0,2*pi,100); fill(0.3*cos(x1)+1,0.3*sin(x1)+1,'g',0.3*cos(x1)-1,0.3*sin(x1)+1,'g') x2=linspace(8.3*pi/6,9.7*pi/6,100);plot(4*cos(x2),4*sin(x2)+2.5,'r*') hold off
6.- >> n=input('ingrese el valor de n: ')
fprintf('la suma de los %g primeros numeros es: %8.0f\n',n,n*(n+1)/2) ingrese el valor de n: 8 n =8 la suma de los 8 primeros numeros es:
36
7. n=input('ingrese el valor de n: ') fprintf('la suma de cuadrados de los n primeros numeros es:%8.0f\n',n*(n+1)*(2*n+1)/6) ingrese el valor de n: 8 n=8 la suma de cuadrados de los n primeros numeros es:
204
8.- n=input('ingrese el valor de n: ') fprintf('la suma de los n primeros nĂºmeros de esta foma es: %8.0f\n',n*(n+1)*(2*n+1)/6+n*(n+1)/2) ingrese el valor de n: 5 n= 5 la suma de los n primeros nĂºmeros de esta foma es:
70
9.- n=input('ingrese el valor de n: ') fprintf('la suma de los primeros n numeros impares es: %8.0f\n',n*n) ingrese el valor de n: 6 n=
6
la suma de los primeros n numeros impares es:
36
10.- a=input('ingrese el valor del ancho: ') h=input('ingrese el valor de la altura: ') fprintf('el area del rectangulo es: %1.0f',a*h) x=linspace(0,a,200);y=linspace(0,h,200);y1=h;plot(x,0,'o-'); hold on;plot(x,y1,'o-');plot(0,y,'o-');plot(a,y,'o-'); grid on;title('AREA DE UN RECTANGULO');
xlabel('ANCHO');ylabel('ALTURA') axis square ingrese el valor del ancho: 5 a=5 ingrese el valor de la altura: h=
4
el area del rectangulo es: 20
11.- a=input('ingrese el valor del primer lado: ')
b=input('ingrese el valor del segundo lado: ') c=input('ingrese el angulo en sexagesimales: ') d=b*cos(c*pi/180) e=b*sin(c*pi/180) x=linspace(0,a,200);plot(x,0,'r*-'),axis equal; hold on; r=linspace(0,b,200);plot(r*cos(c*pi/180),r*sin(c*pi/180),'r*-'),axis equal; x1=d:pi/100:a;y=(e/(d-a))*(x1-a) ;plot(x1,y,'r*-'),axis equal; x2=a:pi/100:d;y=(e/(d-a))*(x2-a) ;plot(x2,y,'r*-'),axis equal grid on;title('AREA DE UN TRIANGULO'); axis square; fprintf('el area del triangulo es = %8.0f\n',a*b*(sin(c*pi/180))/2) ingrese el valor del primer lado: 6 a =6 ingrese el valor del segundo lado: 7 b= 7 ingrese el angulo en sexagesimales: 53 c =53 d =4.2127 e =5.5904 el area del triangulo es =
17
12.- d1=input('ingrese el valor del primer diagonal: ') d2=input('ingrese el valor del segundo diagonal: ') a=d1/2 b=d2/2 x=linspace(0,2*pi,5);plot(a*cos(x),b*sin(x)),axis equal; grid on;title('AREA DEl ROMBO'); xlabel('DIAGONAL 1');ylabel('DIAGONAL 2') axis square fprintf('el area del rombo es = %8.0f\n',d1*d2/2) ingrese el valor del primer diagonal: 5
d1 = 5 ingrese el valor del segundo diagonal: 4 d2 = 4 a =2.5000 b =2 el area del rombo es =
10
13.- a=input('ingrese el valor del # real: ') b=input('ingrese el valor del # imaginario: ') c=atan(b/a)
r=sqrt(a.^2+b.^2) d=r*cos(c) e=r*sin(c) disp('el # en coord. pol. es'); z=[d,e]% ingrese el valor del # real: 5 a=5 ingrese el valor del # imaginario: 4 b =4 c =0.6747 r = 6.4031 d = 5.0000 e =4 el # en coord. pol. es z = 5.0000
4.0000
14.- l=input('ingrese lado del cuadrado:'); fprintf ( 'la suma de perimetros es :%4.3 f|n',2*l.^2); fprintf('la suma de areas :%4.3f|n',4*sqrt (2)*l/(sqrt(2)-1)) ingrese lado del cuadrado:5 la suma de perimetros es :la suma de areas :68.284|n