top of page

Proceso ejercicios
    
    escribir " 1-opcion1";
    escribir " 2-opcion2";
    escribir " 3-opcion3";
    escribir " 4-opcion4"; 
    definir opciones como real;
    escribir "ingrese numero";
    leer opciones;
    
    Segun opciones Hacer
        1:
            definir ft,fo,w,t como real;
            definir inicio1,final1 como real;
            inicio1=10;
            final1=20;
            t=inicio;
            escribir "ingrese valor para fo";
            leer fo;
            escribir "ingrese valor para w";
            leer w;
            Para t<-inicio1 Hasta final1 Con Paso 2 Hacer
                ft= fo*cos(w*t);
                escribir "la frecuencia es ",ft; 
            Fin Para
        2:    
            definir lw,r,wo,w como real;
            definir inicio2,final2 como real;
            inicio2=5;
            final2=27;
            r=inicio;
            escribir "ingrese valor para w";
            leer w;
            escribir "ingrese valor para wo";
            leer wo;
            Para r<-inicio2 Hasta final2 Con Paso 1.5 Hacer
                lw=(r^2)/((w-wo)+r^2);
                escribir "el resultado es ",lw; 
            Fin Para
        3:    
            definir ang,b como real;
            definir inicio3,final3 como real;
            inicio3=2;
            final3=15;
            ang=inicio;
            Para ang<-inicio3 Hasta final3 Con Paso 0.4 Hacer
                b= sen(ang)+2*cos(2*ang);
                escribir "el resultado es ",b; 
            Fin Para
        4:
            definir w,m,p,vol1,vol2 como real;
            definir inicio4,final4 como real;
            inicio4=14;
            final4=36;
            m=inicio;
            escribir "ingrese valor para p";
            leer p;
            escribir "ingrese valor para vol1";
            leer vol1;
            escribir "ingrese valor para vol2";
            leer vol2;
            Para m<-inicio4 Hasta final4 Con Paso 9.9 Hacer
                w=m*p*(vol2-vol1);
                escribir "el resultado es ",w; 
            Fin Para
        De Otro Modo:
            escribir "es imaginario"
        
        Fin Segun
    
FinProceso

Bucles finitos

bottom of page