CODIGOS USADOS EN LOS PROBLEMAS.docx - CODIGOS USADOS EN...

CODIGOS USADOS EN LOS PROBLEMAS
1a)
clear; clc;
%Redondeo
format long
x=4.853
xa= round(round(3*x,2)*round(x+3/7,3),2)
fprintf( 'El primer termino es: %f' ,xa);
xb= round(x*x,2)
xbb= round(2*x-1,3)
xbbb= round(xb*log(xbb),2)
fprintf( 'El segundo termino es: %f' ,xbbb);
xc=sin(x)
xcc=round(xc*xc,4)
fprintf( 'El tercer termino es: %f' ,xcc);
%Truncamiento
ya=fix(3*x*100)/100
yaa= fix((x+3/7)*1000)/1000
yaaa= fix(ya*yaa*100)/100
fprintf( 'El primer termino es: %f' ,yaaa);
yb=fix(x*x*100)/100
ybb=fix(log(2*x-1)*1000)/1000
ybbb= fix(yb*ybb*100)/100
fprintf( 'El segundo termino es: %f' ,ybbb);
yc=fix(sin(x)*10000)/10000
ycc=fix(yc*yc*10000)/10000
fprintf( 'El tercer termino es: %f' ,ycc);
%Valores hallados
fxreal=3*x*(x+3/7)-x*x*log(2*x-1)+sin(x)*sin(x)
fxredondeo=round(round(xa-xbbb,2)+xcc,2)
fxtruncado= fix((fix((yaaa-ybbb)*100)/100 +ycc)*100)/100
fprintf( 'El resultado real es: %f' ,fxreal);
fprintf( 'El resultado por redondeo es: %f' ,fxredondeo);
fprintf( 'El resultado por truncamiento es: %f' ,fxtruncado);
erelativoredondeo= (fxreal-fxredondeo)/fxreal
n=(erelativoredondeo^2)^0.5
erelativotruncamiento= (fxreal-fxtruncado)/fxreal
m=(erelativotruncamiento^2)^0.5
fprintf( 'El error relativo por redondeo es: %f' ,n);
fprintf( 'El error relativo por truncamiento es: %f' ,m);

1b)
clc
format long
divisor=2;
cociente=0;
residuo=0;
a=0;
i=1;
j=1;
b=1;
c=2;
x=0;1;
w=0;
z=0;
n=input( 'Ingrese el tipo de Numero que quiere convertir, ingrese (1)
para Convertir de Decimal a Binario, ingrese (2) para convertir de
Binario a Decimal ' );
if n==1
dividendo=input( 'Ingrese el numero Decimal, para convertir a Binario
' );
residuo=dividendo;
while c>1;
while residuo>=divisor
cociente=cociente+1;
residuo=residuo-divisor;
end
a(j,i)= residuo;
i=i+1;
residuo=cociente;
c=cociente;
cociente=0;
end
a(j,i)=c
f=i
while b<=i
x(j,b)=a(j,f);
f=f-1;
b=b+1;
end
disp( 'Este es el numero en Binario ' )
disp(x)
else
if n==2
z=input(