los ejercisios q m hizieron falta

var b,x,c,r:numerico

inicio

cls()

    imprimir ("\n calcula el valor de la ecua. 3*sqrt(b^2+4*x*c)")

    imprimir ("\n digite el valor de b")

    leer(b)

                 imprimir ("\n digite el valor de x")

    leer(x)

    imprimir ("\n digite el valor de c")

    leer(c)

    r=3*sqrt(b^2+4*x*c)

    imprimir ("\n el valor de la ecua.3*sqrt(b^2+4*x*c) es" , r )

fin

var x,a,b,c,y,r:numerico

inicio

cls()

    imprimir ("\n calcula el valor de la ecua. 34*x^3/(3*sqrt(6*a*b*c))+y/4")

    imprimir ("\n digite el valor de x")

    leer(x)

                 imprimir ("\n digite el valor de a")

    leer(a)

    imprimir ("\n digite el valor de b")

    leer(b)

    imprimir ("\n digite el valor de c")

    leer(c)

    imprimir ("\n digite el valor de y")

    leer(y)

    r=34*x^3/(3*sqrt(6*a*b*c))+y/4

    imprimir ("\n el valor de la ecua.34*x^3/(3*sqrt(6*a*b*c))+y/4 es" , r )

fin

var x,y,r:numerico

inicio

cls()

    imprimir ("\n calcula el valor de la ecua. x^5*y^6+3*x^4*y^3+2")

    imprimir ("\n digite el valor de x")

    leer(x)

    imprimir ("\n digite el valor de y")

    leer(y)

    r= x^5*y^6+3*x^4*y^3+2

    imprimir ("\n el valor de la ecua. x^5*y^6+3*x^4*y^3+2 es" , r )

fin

var z,y,r:numerico

inicio

cls()

    imprimir ("\n calcula el valor de la ecua.4+9%5*z/(5*y) ")

    imprimir ("\n digite el valor de z")

    leer(z)

                 imprimir ("\n digite el valor de y")

    leer(y)

    r=4+9%5*z/(5*y)

    imprimir ("\n el valor de la ecua.4+9%5*z/(5*y) es"  , r )

fin

var a,b,c,d,r:numerico

inicio

cls()

    imprimir ("\n calcula el valor de la ecua. a+b/c*d  ")

    imprimir ("\n digite el valor de a")

    leer(a)

                 imprimir ("\n digite el valor de b")

    leer(b)

    imprimir ("\n digite el valor de c")

    leer(c)

    imprimir ("\n digite el valor de d ")

    leer(d)

    r=a+b/c*d

    imprimir ("\n el valor de la ecua.a+b/c*d es" , r )

fin

var a,x,y,z,r:numerico

inicio

cls()

    imprimir ("\n calcula el valor de la ecua. 6*a*x*y/(sqrt(4*x*a*z)+4*y ")

    imprimir ("\n digite el valor de a")

    leer(a)

                 imprimir ("\n digite el valor de x")

    leer(x)

    imprimir ("\n digite el valor de y")

    leer(y)

    imprimir ("\n digite el valor de z ")

    leer(z)

    r=6*a*x*y/(sqrt(4*x*a*z)+4*y

    imprimir ("\n el valor de la ecua.6*a*x*y/(sqrt(4*x*a*z)+4*y) es " ,  r   )

fin

var x,y,r:numerico

inicio

cls()

    imprimir ("\n calcula el valor de la ecua. x^4*y^2+3+y^4*x^3+10 ")

    imprimir ("\n digite el valor de x")

    leer(x)

                 imprimir ("\n digite el valor de y")

    leer(y)

    imprimir ("\n digite el valor de x")

    leer(x)

    imprimir ("\n digite el valor de y ")

    leer(y)

    r= x^4*y^2+3+y^4*x^3+10

    imprimir ("\n el valor de la ecua. x^4*y^2+3+y^4*x^3+10 es " ,  r   )

fin