1 EJERCICIO 1

1.1 Planteamiento del problema

Escribir un programa que pida la temperatura y si esta es en Fahrenheit o Celsius y presentar en pantalla su transformación en la otra medida.

1.2 Código en R

temperatura <- 100
tipo <- "F"

if(tipo == "F" || tipo == "f"){
  celsius <- (temperatura - 32) * 5/9
  cat("La temperatura en Celsius es:", round(celsius, 2))
} else if(tipo == "C" || tipo == "c"){
  fahrenheit <- (temperatura * 9/5) + 32
  cat("La temperatura en Fahrenheit es:", round(fahrenheit, 2))
} else{
  cat("Tipo de temperatura incorrecto")
}
## La temperatura en Celsius es: 37.78

2 EJERCICIO 2

2.1 Planteamiento del problema

Escribir un programa que pregunte al usuario por el número de horas trabajadas y el coste por hora. Además, debe preguntar si existen horas extras con un valor diferente y calcular la paga correspondiente.

2.2 Código en R

horas <- 40
costo <- 10
extras <- 5
valor_extra <- 15

paga_normal <- horas * costo
paga_extra <- extras * valor_extra

total <- paga_normal + paga_extra

cat("La paga total es:", total)
## La paga total es: 475

3 EJERCICIO 3

3.1 Planteamiento del problema

Escribir un programa que lea un entero positivo y muestre la suma de todos los enteros desde 1 hasta n.

3.2 Código en R

n <- 10

suma <- (n * (n + 1)) / 2

cat("La suma es:", suma)
## La suma es: 55

4 EJERCICIO 4

4.1 Planteamiento del problema

Escribir un programa que pida el peso y estatura del usuario para calcular el índice de masa corporal.

4.2 Código en R

peso <- 70
altura <- 1.75

imc <- peso / (altura^2)

cat("Tu índice de masa corporal es:", round(imc, 2))
## Tu índice de masa corporal es: 22.86

5 EJERCICIO 5

5.1 Planteamiento del problema

Escribir un programa que pregunte una cantidad a invertir, el interés anual y el número de años, y muestre el capital obtenido.

5.2 Código en R

capital <- 1000
interes <- 5
anios <- 3

monto <- capital * (1 + interes/100)^anios

cat("El capital obtenido es:", round(monto, 2))
## El capital obtenido es: 1157.63

6 EJERCICIO 6

6.1 Planteamiento del problema

Realizar un programa que pida el tiempo en horas, minutos o segundos y luego transforme el tiempo a otra unidad.

6.2 Código en R

valor <- 2
origen <- "h"
destino <- "m"

if(origen == "h" && destino == "m"){
  resultado <- valor * 60
} else if(origen == "h" && destino == "s"){
  resultado <- valor * 3600
} else if(origen == "m" && destino == "h"){
  resultado <- valor / 60
} else if(origen == "m" && destino == "s"){
  resultado <- valor * 60
} else if(origen == "s" && destino == "m"){
  resultado <- valor / 60
} else if(origen == "s" && destino == "h"){
  resultado <- valor / 3600
} else{
  resultado <- valor
}

cat("Resultado:", resultado)
## Resultado: 120

7 EJERCICIO 7

7.1 Planteamiento del problema

Escribir un programa en el que se digiten varios números y luego se presenten ordenados.

7.2 Código en R

numeros <- c()

cantidad <- 5

for(i in 1:cantidad){
  num <- c(85, 12, 44, 3, 27)[i]
  numeros <- c(numeros, num)
}

ordenados <- sort(numeros)

print("Números ordenados:")
## [1] "Números ordenados:"
print(ordenados)
## [1]  3 12 27 44 85

8 EJERCICIO 8

8.1 Planteamiento del problema

Escribir un programa que calcule el factorial de un número digitado por el usuario.

8.2 Código en R

n <- 5

factorial <- 1

for(i in 1:n){
  factorial <- factorial * i
}

cat("El factorial es:", factorial)
## El factorial es: 120

9 EJERCICIO 9

9.1 Planteamiento del problema

Escribir un programa que pida un número e indique si es primo o no.

9.2 Código en R

numero <- 7

primo <- TRUE

if(numero <= 1){
  primo <- FALSE
} else{
  for(i in 2:(numero-1)){
    if(numero %% i == 0){
      primo <- FALSE
    }
  }
}

if(primo){
  cat("El número", numero, "es primo")
} else{
  cat("El número", numero, "no es primo")
}
## El número 7 es primo

10 EJERCICIO 10

10.1 Planteamiento del problema

Escribir un programa que pida un número e indique si es par o impar.

10.2 Código en R

numero <- 4

if(numero %% 2 == 0){
  cat("El número", numero, "es par")
} else{
  cat("El número", numero, "es impar")
}
## El número 4 es par

11 Conclusión

Mediante el desarrollo de este taller se aplicaron conceptos esenciales de programación en R, utilizando estructuras condicionales, ciclos, operadores y funciones matemáticas para resolver distintos problemas propuestos. Además, el uso de R Markdown permitió integrar explicaciones y código en un solo documento, facilitando la organización, visualización y publicación del trabajo académico.