EJERCICOS!

1- var r,x,a,c,b: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecuacion raiz2+(4*x)*(4*a*c)/(2*b)" )
imprimir("\ndijite el valor para x")
leer(x)
imprimir("\ndijite el valor para a ")
leer(a)
imprimir("\ndijite el valor para c")
leer(c)
imprimir("\ndijite el valor para b ")
leer(b)
r= sqrt (4*x)*(4*a*c)/(2*b)
imprimir ("\nel valor de raiz 2 + (4*x) + (4*a*c)/(2*b)", r)
fin

Ejercicios
2- var r,x,b,y,c,a: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecuacion x^4/b * (x^3*y^2)/36+y/a" )
imprimir("\ndijite el valor para x")
leer(x)
imprimir("\ndijite el valor para b")
leer(b)
imprimir("\ndijite el valor para y")
leer(y)
imprimir("\ndijite el valor para c ")
leer(c)
imprimir("\ndijite el valor para a ")
leer(a)
r= x^4/b * (x^3*y^2)/36+y/a
imprimir ("\nel valor de x^4/b * (x^3*y^2)/36+y/a", r)
fin

-3 var r,a,b,c: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecuacion a%b*(c/2)" )
imprimir("\ndijite el valor para a")
leer(a)
imprimir("\ndijite el valor para ")
leer(b)
imprimir("\ndijite el valor para c")
leer(c)
r= a%b*(c/2)
imprimir ("\nel valor de a%b*(c/2)", r)
fin

4- var r,a,b,c: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecuacion div(a/b)/ (5*c)" )
imprimir("\ndijite el valor para a")
leer(a)
imprimir("\ndijite el valor para b ")
leer(b)
imprimir("\ndijite el valor para c")
leer(c)
r= int (a/b)*(5*c)
imprimir ("\nel valor de int (a/b)/ (5*c)", r)
fin

EJERCICIOS!!

1- var r,x,y: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecua.2*x+y ")
imprimir("\ndijite el valor para y ")
leer(y)
imprimir("\ndijite el valor para x ")
leer(x)
r= 2*x+y
imprimir ("\nel valor 2*x+y", r)
fin

2- var r,x,: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecua.x^2 ")
imprimir("\ndijite el valor para x")
leer(x)
r= x^2
imprimir("\ndijite el valor de la ecua. x^2 es ")
fin

3-var r,x,y,m: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecua.x/y+m ")
imprimir("\ndijite el valor para yx")
leer(x)
imprimir("\ndijite el valor para y ")
leer(y)
imprimir("\ndijite el valor para m ")
leer(m)
imprimir ("\nel valor de la ecua. x/y+m", r)
fin

4- Raiz de 2 (X)

var r,x: numerico
inicio
cls ( )
imprimir("\ncalcule el valor de la ecua.raiz 2 (X) ")
imprimir("\ndijite el valor para x")
leer(x)
r= sqrt + (x)
imprimir("\nel valor raiz 2 (x)", r)
fin

5-[3*raiz2(2*y+x^2)]/2+(6*x-2)/(2*z-5)

var r,x,y,z= numerico
Inicio:
cls ( )
imprimir ("\nclacule el valor de la ecua. 6*x-2 ")
fin