Programa Scilab

function soluciones() // se muestra el menu de opciones // SE DEFINEN LA VARIABLE S resp='s'; while resp=='s' | resp=='S

Views 117 Downloads 10 File size 66KB

Report DMCA / Copyright

DOWNLOAD FILE

Recommend stories

Citation preview

function soluciones() // se muestra el menu de opciones // SE DEFINEN LA VARIABLE S resp='s'; while resp=='s' | resp=='S' disp('MENÚ'); disp('1_FAMILIA DE CIRCUNFERENCIAS'); disp('2_PH DE UNA SOLUCIÓN'); disp('3_GRÁFICA DE LA FUNCIÓN SENO'); disp('4_MOLARIDAD'); disp('5_REGISTRO DE ESTUDIANTES'); disp('6_DETERMINACIÓN DE UNA CONICA'); disp('7_DETERMINACION DE UN AÑO BISIESTO'); opc=input('Escoja su opcion: '); select opc // SE ANALIZAN LOS CASOS case 1 then // SE INGRESAN LOS DATOS REQUERIDOS h1=input('Digite la abcisa del centro de la primera circunferencia: '); k1=input('Digite la ordenada del centro de la primera circunferencia: '); r1=input('Digite el radio de la primera circunferencia: '); h2=input('Digite la abcisa del centro de la segunda circunferencia: '); k2=input('Digite la ordenada del centro de la segunda circunferencia: '); r2=input('Digite el radio de la segunda circunferencia: '); d=sqrt((h1-h2)^2+(k1-k2)^2) // SE ANALIZAN LAS CONDICIONES if dr1+r2 then disp('Familia de circunferencias exteriores'); else d==r1+r2 disp('Familia de circunferencias tangentes exteriores');

end end case 2 then // SE INGRESA EL DATO REQUERIDO n=input('Digite la concentración de iones(de la forma 10^-n): '); pH=-log10(n); // SE ANALIZAN LAS CONDICIONES if pH7 then disp('La solución es básica o alcalina',pH); else disp('La solución es neutra',pH); end end case 3 then // SE DEFINEN LOS VALORES DE 'X' Y 'Y' x=-20:1:20 y=sin(x); plot(x,y); xgrid; disp(plot); disp(xgrid); case 4 then // SE INGRESAN LOS VALORES PEDIDOS m=input('Digite el numero de masa: '); M=input('Digite la masa molar del compuesto y/o elemento: '); v=input('Digite ek volumen(en litros): '); n=m/M a=n/v // SE MUESTRA EL VALOR DE LA MOLARIDAD printf('La molaridad de la solucion es:%3f\n',a); case 5 then // SE INGRESA EL NUMERO DE ESTUDIANTES n=input('Registre el número de estudiantes: ') estudiante=struct('nombre','','apellido','','edad',0,'matricula','');

disp('REGISTRO DE ESTUDIANTES') //Elaboración de la estructura repetitiva for i=1:n estudiante(i).nombre=input('ingrese nombre:','s'); estudiante(i).apellido=input('Ingrese apellido:','s'); estudiante(i).edad=input('Ingrese edad:'); estudiante(i).matricula=input('Ingrese matrícula:','s'); nombre=estudiante(i).nombre; apellido=estudiante(i).apellido; edad=estudiante(i).edad; matricula=estudiante(i).matricula; printf('%s\t%s\t%d\t%s\n',nombre,apellido,edad,matricula); end case 6 then // SE INGRESA EL VALOR DE LA EXCENTRICIDAD e=input('Ingrese la excentricidad de la conica: '); // SE ANALIZAN LAS CONDICIONES if e>1 then disp('La cónica es una hipérbola'); else if e>0 & e