UNIVERSIDAD CENTRAL DEL ECUADOR
FACULTAD DE CIENCIAS ECONÓMICAS
CARRERA DE INGENIERÍA ESTADÍSTICA



INFORME GRUPAL

RESOLUCIÓN DE ECUACIONES DE SEGUNDO GRADO
Y SISTEMAS DE ECUACIONES DE DOS INCÓGNITAS EN EL LENGUAJE R


ASIGNATURA: Programación

GRUPO: N.º 4


INTEGRANTES:

Ariel MACIAS - EDWIN SANCHEZ - ROBERTO MEDINA - ANGELA TREJO


DOCENTE: Ing. Francisco Valverde

CURSO: SR3-002

FECHA: 08 DE NOVIEMBRE DE 2026



QUITO – ECUADOR

Introducción

El lenguaje de programación R constituye una herramienta útil para resolver problemas matemáticos mediante procedimientos computacionales.

En este documento se estudia la resolución de ecuaciones de segundo grado y sistemas de ecuaciones lineales con dos incógnitas, utilizando funciones y operaciones matemáticas de R.

Objetivos

1. Ecuaciones de segundo grado

Una ecuación de segundo grado tiene la forma:

\[ax^2+bx+c=0\]

Donde a, b y c son coeficientes reales y a es diferente de cero.

La fórmula general es:

\[x=\frac{-b\pm\sqrt{b^2-4ac}}{2a}\]

1.1 Ejemplo de resolución

Resolver:

\[x^2-5x+6=0\]

Código en R

a <- 1
b <- -5
c <- 6

D <- b^2 - 4*a*c

x1 <- (-b + sqrt(D))/(2*a)
x2 <- (-b - sqrt(D))/(2*a)

cat("Discriminante:", D, "\n")
Discriminante: 1 
cat("Solución 1:", x1, "\n")
Solución 1: 3 
cat("Solución 2:", x2, "\n")
Solución 2: 2 

Interpretación

El discriminante es positivo, por lo tanto existen dos soluciones reales diferentes.

Las soluciones son x = 3 y x = 2.

1.2 Verificación de las soluciones

cat("Verificación de x1:",
    a*x1^2 + b*x1 + c, "\n")
Verificación de x1: 0 
cat("Verificación de x2:",
    a*x2^2 + b*x2 + c, "\n")
Verificación de x2: 0 

Ambas soluciones producen cero al sustituirse en la ecuación original.

2. Sistemas de ecuaciones de dos incógnitas

Un sistema de ecuaciones lineales tiene la forma:

\[ \begin{cases} a_1x+b_1y=c_1\\ a_2x+b_2y=c_2 \end{cases} \]

Para resolverlo se puede utilizar el método matricial.

2.1 Ejemplo práctico

Resolver el sistema:

\[ \begin{cases} 2x+y=8\\ x-y=1 \end{cases} \]

La representación matricial es:

\[AX=B\]

Código en R

A <- matrix(c(2, 1,
              1, -1),
            nrow = 2,
            byrow = TRUE)

B <- c(8, 1)

solucion <- solve(A, B)

cat("Valor de x:", solucion[1], "\n")
Valor de x: 3 
cat("Valor de y:", solucion[2], "\n")
Valor de y: 2 

Interpretación

La solución obtenida es:

  • x = 3
  • y = 2

Esto significa que ambos valores satisfacen simultáneamente las dos ecuaciones.

2.2 Comprobación del sistema

resultado <- A %*% solucion

print(resultado)
     [,1]
[1,]    8
[2,]    1
cat("¿La solución es correcta?:",
    isTRUE(all.equal(as.vector(resultado), B)),
    "\n")
¿La solución es correcta?: TRUE 

3. Conclusiones

  1. Las ecuaciones de segundo grado pueden resolverse eficientemente mediante la fórmula general implementada en R.

  2. Los sistemas de ecuaciones de dos incógnitas pueden solucionarse mediante operaciones matriciales y la función solve().

  3. El uso de R fortalece el aprendizaje matemático al combinar teoría y práctica computacional.

  4. R Markdown permite integrar explicaciones, fórmulas, códigos y resultados en un solo documento reproducible.