Proceso semana_8
    //declaracion
    definir opcion1 Como Entero ;
    escribir " ingrese una opcion ";
    escribir "********menu********" ;
    escribir "1. trabajo termico "
    escribir "2.suma"
    escribir "3. mruv "
    escribir "4. peso. "
    leer opcion1;
    Segun opcion1 Hacer
        1:
            //declaracion
            definir w,p2,p1,v1,v2,n,inicial1,fianal1,inicial2,final2 como real;
            //asignacion
            escribir "p2"
            leer p2
            escribir "v2"
            leer v2
            escribir "v1"
            leer v1
            //proceso
            inicial1= 0
            final1= 0.9
            inicial2 = 10
            final2 = 15
            Para n<-inicial1 Hasta final1 Con Paso 0.1 Hacer
                Para p1<-inicial2 Hasta final2 Con Paso 0.2 Hacer
                    w= (p2*v2-p1*v1)/(1-n)
                    escribir "para p2 =",p2,"y v2=",v2, "y p1=",p1,"y v1=",v1, "y la eficiencia n=",n,"es: ", w;
                Fin Para
            Fin Para
            
            
        
        2: 
            //declaracion
            definir a,b,c,inicial1,final1,inicial2,final2 Como Real
            //proceso
            inicial1= 10
            fianl1=15
            inicial2=1
            final2=10
            Para a<-final1 Hasta final1 Con Paso 0.025 Hacer
                Para b<-inicial2 Hasta final2 Con Paso 0.1 Hacer
                    c=a+b
                    escribir "para a=",a, "y b=",b, es c
                Fin Para
            Fin Para
            
        3:
            //declaracion
            definir vf,vi,a,e,inicial,final como real
            //asignacion
            escribir "v1"
            leer v1
            escribir "a"
            leer a
            //proceso
            inicial=10
            final=30
            
            Para e<-inicial Hasta final Con Paso 1.5 Hacer
                vf=rc(v1^2+(2*a*e))
                escribir "para v1 =",v1, "y a=",a,"y e=",e,es vf
            Fin Para
            
        4:
            //declracion
            definir p,m,g,nicial,final como real
            //proceso
            nicial=100
            final=500
            g=9.8
            Para m<-inicial Hasta final Con Paso 30 Hacer
                p=m*g
                escribir "para g=",g,"y m=",m, es p
            Fin Para
            
    De Otro Modo:
            
    Fin Segun
    
    
FinProceso