Algoritmo Operaciones_Matematicas
Escribir ""
Escribir "Hola"
Escribir "¿Que operación vas a hacer?"
Escribir "Para elegir escribre el número correspondiente a la operación deseada"
Escribir ""
Escribir "Ecuación de segundo grado"
Escribir "1"
Escribir ""
Escribir "Logaritmo"
Escribir "2"
Escribir ""
Leer O1
Si O1 = 1
SoNS = "Si"
SoNN = "No"
Repetir
Escribir ""
Escribir "Escribe tu ecuación paso por paso:"
Escribir ""
Escribir "1º El número que multiplica a x²:"
Leer EA //a
Escribir "2º El número que multiplica a x:"
Leer EB //b
Escribir "3º El termino independiente:"
Leer EC //c
Escribir ""
Escribir "Si no te has equivocado tú ecuación deberia ser:"
Escribir EA "x²" "+" EB "x" "+" EC "=" "0"
Escribir""
Escribir "x=" (RC(EB*EB-4*EA*EC)-EB)/2*EA " (+)"
Escribir "x=" (-RC(EB*EB-4*EA*EC)-EB)/2*EA " (-)"
Escribir ""
Hasta Que SoNS <> "Si"
FinSi
Si O1 = 2
Escribir "¿Deseas transformar un logaritmo en una ecuación o viceversa?"
Escribir "Si quieres pasar de logaritmo a ecuación escribe"
Escribir "1"
Escribir "Si quieres pasar de ecuación a logaritmo escribe"
Escribir "2"
Leer LoE
Si LoE = "1"
Escribir "Cual es la incognita que falta"
Escribir "Si es la base escribe"
Escribir "B"
Escribir ""
Escribir "Si es el argumento escribe"
Escribir "A"
Escribir ""
Escribir "Si es el logaritmo escribe"
Escribir "C"
Escribir ""
Leer Z2
Si Z2 = B
Escribir "Escribe el argumento"
Leer Argumento
Escribir "Escribe el resultado"
Leer Resultado
Escribir "La base es igual a" Argumento^1/Resultado
FinSi
Si Z2 = A
Escribir "Escribe la base"
Leer Base
Escribir "Escribe el resultado"
Leer Resultado
Escribir "La base es igual a" Base^Resultado
FinSi
FinSi
Si LoE = "2"
FinSi
FinSi
FinAlgoritmo
(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)