Proceso bla_blabla
    definir opciones como entero
    
    
    Escribir "1:f"
    Escribir "2:v"
    Escribir "3:p"
    Escribir "4:B"
    
    Escribir "ingrese una opcion"
    Leer opciones 
    
    segun  opciones hacer
         1:
            // definir f ,a como entero
            definir inicial,final como entero
            definir p como real
            inicial =10
            final =100
            Escribir "ingrese a"
            leer a
            p=inicial;
            Mientras ( p <=final) Hacer
                f<-p/a
                p=p+5
                Escribir "la f es;" ,f
            FinMientras
        2:    
            // definir v,g,m como entero
            definir  inicial, final como entero
            definir h como real
            inicial =5
            final =10
            Escribir "ingrese g "
            leer g
            Escribir "ingrese m"
            Leer m
            Mientras ( h < final) Hacer
                v<-g*m*h
                h=h+00.5
                escribir "la v es;",v
            FinMientras
        3:
            // definir p,i como entero
            definir  inicial, final como entero
            definir v como real
            inicial =110
            final =220
            escribir "ingrese i"
            Leer  i
            Mientras (v <=final) Hacer
                p<-v*i
                v=v+10
                escribir "la p es;",p
            FinMientras
        4:
            // definir B ,ib como entero
            definir  inicial, final como entero
            definir ic como real
            inicial =1
            final =5
            Escribir "ingrese ib"
            leer ib
            Mientras ( ic <= final) Hacer
                B=ic/ib
                ic =ic +0.2
                escribir "la B es; ",B
            FinMientras
    FinSegun
    
FinProceso