miércoles, 9 de mayo de 2007

Practica 2 de MAtlab

hoy tube mi segunda practica con MAtlaB, la practica se baso en el uso de estructuras condicionales, las famosas if-else, ahi les mando el ejemplo de las 2 practicas, mezclo un poco de ciclos para hacer mas divertido el programa o la programacion.

--------------------------------------------------------------------------------
clc; %Limpia pantalla al iniciar la aplicacion%
a=1; %Variable auxiliar para el control del ciclo del menu%
while a >0, %iniciamos el ciclo,este se repetira hasta que a sea menor a 0%
disp('UNIVERSIDAD VERACRUZANA-PRACTICAS MATLAB-ESTRUCTURAS CONDICIONALES');
disp('');
disp('MENU');
disp('1.- Ejemplo 1(Raicez cuadraticas)');
disp('2.- Ejemplo 2(Ley de Ohms');
disp('3.- Salir');
opt=input('Ingresa tu Opcion:');
switch opt %condicionamos la opction que elige el usuario%
case 1, %condicionamos si el usuario eligio 1, esto nos ahorra mucho espacio a comparacion del los if-else
a=input('ingresa el VAlor de a=');
b=input('ingresa el VAlor de b=');
c=input('ingresa el VAlor de c=');
dis=(b.^2)-(4*a*c);
%empezamos a condicionar el resultado del discriminante; dependiendo si la raiz sea real,
%imaginaria o las raicez sean iguales.
if dis>0,
disp('La raiz es real');
else
disp('La raiz es Imaginaria');
end
if dis==0,
disp('Las raicez son iguales');
end
case 3,
clc;
break;
case 2,
nure=input('Ingresa el Numero de Resistencias a utilizar');
if nure==0,
disp('Error');
pause;
elseif nure==1,
disp('RT=R');
pause;
elseif nure==2,
r1=input('Ingresa el Valor de R1');
r2=input('Ingresa el Valor de R2');
rt=((1/r1)+(1/r2));
disp('La suma de resistencias en paralelo es:');
disp(rt);
pause;
elseif nure==3,
r1=input('Ingresa el Valor de R1');
r2=input('Ingresa el Valor de R2');
r3=input('Ingresa el Valor de R3');
rt=((1/r1)+(1/r2)+(1/r3));
disp('La suma de resistencias en paralelo es:');
disp(rt);
pause;
elseif nure==4,
r1=input('Ingresa el Valor de R1');
r2=input('Ingresa el Valor de R2');
r3=input('Ingresa el Valor de R3');
r4=input('Ingresa el Valor de R4');
rt=((1/r1)+(1/r2)+(1/r3)+(1/r4));
disp('La suma de resistencias en paralelo es:');
disp(rt);
pause;
elseif nure>4,
disp('Lo siento el sistema acepta como maximo 4 resistencias');
end
end
end
end
end
end

-----------------------------------------------------------

Este es el codigo, y abajo la imagen del programa ya ejecutado

No hay comentarios: