PARTE 1

A continuación presentamos ejercicios desarrollados cada uno con su respectivo procedimiento:

Ejercicio 1

Escribe un programa que solicite los catetos de un triángulo rectángulo y muestre su hipotenusa.

Paso 1: Pedimos ingresar los valores de los catetos:

Paso 2: Ingresamos la fórmula para calcular la hipotenusa:

Paso 3: Mostramos el resultado del ejercicio:

#Paso 1:
num1<- as.numeric(readline("Ingrese el valor del primer cateto: "))

## Ingrese el valor del primer cateto:

num2<- as.numeric(readline("Ingrese el valor del segundo cateto: "))

## Ingrese el valor del segundo cateto:

#Paso 2:
res1<- sqrt((num1^2)+(num2^2))
#Paso 3:
cat("La hipotenusa del triángulo rectángulo es: ", res1)

## La hipotenusa del triángulo rectángulo es:  NA

Ejercicio 2

Escribe un programa que calcule las soluciones de una ecuación de segundo grado de la forma ax^2+bx+c=0.

Para ello utilizaremos la fórmula general:

\[Fórmula\ general=\frac{-4\pm \sqrt{b^2-4ac}}{2a}\]

Paso 1: Pedimos ingresar los valores de a, b y c:

Paso 2: Ingresamos la fórmula:

Paso 3: Mostramos el resultado del ejercicio:

#Paso 1:
a<- as.numeric(readline("Ingrese el valor de A: "))

## Ingrese el valor de A:

b<- as.numeric(readline("Ingrese el valor de B: "))

## Ingrese el valor de B:

c<- as.numeric(readline("Ingrese el valor de C: "))

## Ingrese el valor de C:

#Paso 2:
x1<- (-b+(sqrt(b^2-4*a*c)))/2*a
x2<- (-b-(sqrt(b^2-4*a*c)))/2*a
#Paso 3:
cat("La solución x1 es: ", x1)

## La solución x1 es:  NA

cat("La solución x2 es: ", x2)

## La solución x2 es:  NA

Ejercicio 3

Calcular el área del triángulo rectángulo dadas su base y altura.

Su fórmula es:

\[Área=\frac{base*altura}{2}\]

Paso 1: Ingresamos las variables área y altura:

Paso 2: Ingresamos la fórmula:

Paso 3: Mostramos el resultado del ejercicio:

#Paso 1:
base<-as.numeric(readline("Ingrese la base: " ))

## Ingrese la base:

altura<-as.numeric(readline("Ingrese la altura: "))

## Ingrese la altura:

#Paso 2:
area<-(base*altura)/2
#Paso 3:
cat("El área del triangulo rectangulo es: ", area)

## El área del triangulo rectangulo es:  NA

Ejercicio 4

Calcular el área y perímetro de un rectángulo dado su base y altura.

Fórmula 1:

\[Área= base*altura\]

Fórmula 2:

\[Perímetro= 2(base)+2(altura)\]

Paso 1: Ingresamos las variables base y altura:

Paso 2: Ingresamos la fórmula del área y mostramos su resultado:

Paso 3: Ingresamos la fórmula del perímetro y mostramos su resultado:

#Paso 1:
base<-as.numeric(readline("Ingresa la base del rectangulo "));

## Ingresa la base del rectangulo

base

## [1] NA

altura<-as.numeric(readline("Ingresa la altura del rectangulo "))

## Ingresa la altura del rectangulo

altura

## [1] NA

#Paso 2:
area<-base*altura
cat("El area de rectangulo es:",base,"X",altura,"=",area )

## El area de rectangulo es: NA X NA = NA

#Paso 3:
perimetro<- 2*base+2*altura
cat("El perimetro del rectangulo es:",base,"+",base,"+",altura,"+",altura,"=",perimetro)

## El perimetro del rectangulo es: NA + NA + NA + NA = NA

Ejercicio 5

Calcular el promedio de 3 notas que estén entre 0 y 20.

Fórmula para el cálculo:

\[Promedio=\frac{nota1+nota2+nota3}{3}\]

Paso 1: Ingresamos las notas 1, 2 y 3:

Paso 2: Ingresamos la fórmula:

Paso 3: Mostramos el resultado del ejercicio:

#Paso 1:
nota1<-as.numeric(readline("Ingrese la nota1: "))

## Ingrese la nota1:

nota2<-as.numeric(readline("Ingrese la nota2: "))

## Ingrese la nota2:

nota3<-as.numeric(readline("Ingrese la nota3: "))

## Ingrese la nota3:

#Paso 2:
total<-(nota1+nota2+nota3)/3
#Paso 3:
cat("El promedio de las tres notas es: ", total)

## El promedio de las tres notas es:  NA

Ejercicio 6

Calcular el área y perímetro de la circunferencia dado el radio.

Paso 1: Ingresamos el radio de la circunferencia:

Paso 2: Ingresamos las fórmulas:

Paso 3: Mostramos el resultado del ejercicio:

#Paso 1:
radio<- as.numeric(readline("Ingrese el radio de la circunferencia: "))

## Ingrese el radio de la circunferencia:

#Paso 2:
area<-(pi*radio)^2
perimetro<- (2*pi*radio)
#Paso 3:
cat("El área de la circunferencia es: ", area, "y su perímetro es: ", perimetro)

## El área de la circunferencia es:  NA y su perímetro es:  NA

Ejercicio 7

Calcular el área y perímetro de un trapecio dado su base mayor, base menor y altura.

Paso 1: Ingresamos los valores de la base menor, base mayor, altura y lados:

Paso 2: Ingresamos las fórmula para el área y mostramos su resultado:

Paso 3: Ingresamos las fórmula para el perímetro y mostramos su resultado:

#Paso 1:
basemenor<-as.numeric(readline("Ingresa la base menor del trapecio "))

## Ingresa la base menor del trapecio

basemayor<- as.numeric(readline("Ingresa la base mayor del trapecio "))

## Ingresa la base mayor del trapecio

altura<-as.numeric(readline("Ingresa la altura del traecio "))

## Ingresa la altura del traecio

lado<-as.numeric(readline("Ingresa el tamaño de uno de los lados "))

## Ingresa el tamaño de uno de los lados

lado1<-as.numeric(readline("Ingresa el tamaño del segundo lado "))

## Ingresa el tamaño del segundo lado

#Paso 2:
area<- ((basemayor+basemenor)/2)*altura
cat("El are es ","(",basemayor,"+",basemenor,")","/","2 *",altura,"=",area)

## El are es  ( NA + NA ) / 2 * NA = NA

#Paso 3:
perimetro<- basemayor+basemenor+lado+lado1
cat("El perimetro es: ",basemayor,"+",basemenor,"+",lado,"+",lado1)

## El perimetro es:  NA + NA + NA + NA

Ejercicio 8

Dados dos números, determinar cual es el número mayor y cual es el número menor, si los dos números son iguales el mensaje debe decir que son números iguales.

Paso 1: Ingresamos los valores para número 1 y número 2:

Paso 2: Ingresamos las funciones y símbolos para su comparación y mostramos resultados:

#Paso 1:
n1<- as.numeric(readline("Ingrese el número uno: "))

## Ingrese el número uno:

n2<- as.numeric(readline("Ingrese el número dos: "))

## Ingrese el número dos:

#Paso 2:
sol1<- n1>n2
sol2<- n2>n1
sol3 <- n1==n2
cat("El número ", n1, "es mayor a ", n2, "->", sol1)

## El número  NA es mayor a  NA -> NA

cat("El número ", n2, "es mayor a ", n1, "->", sol2)

## El número  NA es mayor a  NA -> NA

cat("El número ", n1, "es igual a ", n2, "->", sol3)

## El número  NA es igual a  NA -> NA

Ejercicio 9

Escribe un programa que lea dos números y muestre en la salida su suma, resta, multiplicación y división.

FÓRMULA PARA SUMAR DOS NÚMEROS:

\[SUMA= Número1 + Número2\]

FÓRMULA PARA RESTAR DOS NÚMEROS:

\[RESTA= Número1-Número2\]

FÓRMULA PARA MULTIPLICAR DOS NÚMEROS:

\[MULTIPLICACIÓN= Número1 * Número2\]

FÓRMULA PARA DIVIDIR DOS NÚMEROS:

\[DIVISIÓN= Número1/Número2\]

Paso 1: Ingresamos los valores del número 1 y número 2:

Paso 2: Ingresamos las fórmula para cada operación y mostramos su respuesta:

#Paso 1:
num1 <- as.numeric(readline("Ingrese el primer número:"))

## Ingrese el primer número:

num2 <- as.numeric(readline("Ingrese el segundp número:"))

## Ingrese el segundp número:

#Paso 2:
suma <- num1+num2
suma

## [1] NA

cat("La suma de los números ingresados es:", suma,"\n")

## La suma de los números ingresados es: NA

resta <- num1-num2
resta

## [1] NA

cat("La resta de los números ingresados es:", resta,"\n")

## La resta de los números ingresados es: NA

multiplicación <- num1*num2
multiplicación

## [1] NA

cat("La multiplicación de los números ingresados es:", multiplicación,"\n")

## La multiplicación de los números ingresados es: NA

división <- num1/num2
división

## [1] NA

cat("La división de los números ingresados es:", división,"\n")

## La división de los números ingresados es: NA

Ejercicio 10

Realice un Programa que pida una cantidad en dólares y como resultado se visualice el IVA (12%) y el valor total a pagar.

Paso 1: Ingresamos el valor que deseamos calcular:

Paso 2: Multiplicamos el valor por el 0,12 y mostramos el valor del IVA:

Paso 3: Mostramos el valor total a pagar que es el valor anterior + el valor del IVA:

#Paso 1:
dólares<- as.numeric(readline("Ingrese la cantidad en dólares: "))

## Ingrese la cantidad en dólares:

#Paso 2:
iva<-dólares*0.12
iva

## [1] NA

cat("El valor del IVA es de: ", iva)

## El valor del IVA es de:  NA

#Paso 3:
total<-iva+dólares
total

## [1] NA

cat("El valor total a pagar es de: ", total)

## El valor total a pagar es de:  NA

PARTE 2

A continuación presentamos la segunda parte de ejercicios desarrollados:

Ejercicio 11

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.

Paso 1: Ingresamos el tipo de temperatura Fahrenheit o Celsius:

Paso 2: Ingresamos la temperatura en grados:

Paso 3: Colocamos la fórmula correspondiente y mostramos la respuesta:

#Paso 1:
#Si FA <- para Fahrenheit o CE <- para Celsius
Tip <- as.character(readline("Ingrese FA <- Fahrenheit O CE <- Celsius : "))

## Ingrese FA <- Fahrenheit O CE <- Celsius :

#Paso 2:
tem1 <- as.numeric(readline("Ingrese la temperatura: "))

## Ingrese la temperatura:

#Paso 3:
if(Tip == "FA")
 a<-((tem1-32)/1.8)
cat("La transformacion a Celsius es: ",a)

## La transformacion a Celsius es:  NA

if(Tip == "CE")
 b<-((tem1*1.8)+32)
cat("La transformacion a Fahrenheit es: ",b)

## La transformacion a Fahrenheit es:  NA

Ejercicio 12

Escribir un programa que pregunte al usuario por el número de horas trabajadas y el costo por hora. Después debe mostrar por pantalla la paga que le corresponde, además debe preguntar si existen horas extras que tienen un valor diferente y con estos valores se calcule la paga correspondiente.

FÓRMULA 1

\[Sueldo\ sin\ horas\ extra=horas\ trabajadas*costo\]

FÓRMULA 2

\[Sueldo\ total=(horas\ trabajadas*costo)+horas\ extras\] ##### Paso 1: Asignamos las variables e ingresamos sus valores: ##### Paso 2: Presentamos la respuesta y su respectivo cálculo:

#Paso 1:
horat<-as.numeric(readline("Ingrese el numero de horas trabajadas : "))

## Ingrese el numero de horas trabajadas :

costot<-as.numeric(readline("Ingrese el costo de horas trabajadas : "))

## Ingrese el costo de horas trabajadas :

extrast<-as.numeric(readline("Ingrese el numero de horas extras trabajadas : "))

## Ingrese el numero de horas extras trabajadas :

#Paso 2:
cat("Su sueldo sin horas extras es : ",(horat*costot))

## Su sueldo sin horas extras es :  NA

cat("Su sueldo total a recibir es: ",(horat*costot+extrast))

## Su sueldo total a recibir es:  NA

Ejercicio 13

Escribir un programa que lea un entero positivo, n, introducido por el usuario y después muestre en pantalla la suma de todos los enteros desde 1 hasta n. La suma de los n primeros enteros positivos puede ser calculada de la siguiente forma:

\[Suma=n(n+1)2\]

Paso 1: Asignamos una variable e ingresamos su valor:

Paso 2: Ingresamos la fórmula:

Paso 3: Presentamos la respuesta:

#Paso 1:
n <- as.numeric(readline("Ingrese un numero entero:"))

## Ingrese un numero entero:

#Paso 2:
suma <- (n*(n+1)/2)
suma

## [1] NA

#Paso 3:
cat("La suma total de los enteros positivos desde 1 hasta", n, "")

## La suma total de los enteros positivos desde 1 hasta NA

Ejercicio 14

Escribir un programa que pida al usuario su peso (en kg) y estatura (en metros), calcule el índice de masa corporal y lo almacene en una variable, y muestre por pantalla la frase Tu índice de masa corporal es donde es el índice de masa corporal calculado redondeado con dos decimales.

Paso 1: Asignamos el valor de las variables peso y altura:

Paso 2: Ingresamos las fórmulas correspondientes:

Paso 3: Presentamos la respuesta:

#Paso 1:
Peso<- as.double(readline("Ingresa tu peso en KG: "))

## Ingresa tu peso en KG:

estatura<- as.double(readline("Ingresa tu estura en METROS^2: "))

## Ingresa tu estura en METROS^2:

#Paso 2:
imc<- Peso/estatura**2
imc<-round(imc, digits = 2)
#Paso 3:
cat("Tu peso es de ", Peso,"KG","TU estatura de: ", estatura,"m^2","TU imc es de: ", imc)

## Tu peso es de  NA KG TU estatura de:  NA m^2 TU imc es de:  NA

Ejercicio 15

Escribir un programa que pregunte al usuario una cantidad a invertir, el interés anual y el número de años, y muestre por pantalla el capital obtenido en la inversión.

FÓRMULA:

\[(Inversión*(\frac{interés}{100})+inversión\]

Paso 1: Asignamos el valor para variables inversión, interés y años:

Paso 2: Ingresamos la fórmula:

Paso 3: Presentamos la respuesta:

#Paso 1:
inversion <- as.numeric(readline("Ingrese la cantidad a invertir: "))

## Ingrese la cantidad a invertir:

interes <- as.numeric(readline("Ingrese el interes anual que se espera obtener: "))

## Ingrese el interes anual que se espera obtener:

años<-as.numeric(readline("Ingrese el numero de años: "))

## Ingrese el numero de años:

#Paso 2:
capital <- (inversion*(interes/100)*años)+inversion
capital

## [1] NA

#Paso 3:
cat ("Al invertir", inversion, "se obtiene un capital de:", capital)

## Al invertir NA se obtiene un capital de: NA

Ejercicio 16

Realizar un programa que pida el tiempo ya sea en horas, minutos o segundos, luego indicar en qué tipo de tiempo desea transformar y luego presentar el resultado.

Paso 1: Asignamos el valor para tiempo en horas o minutos:

Paso 2: Ingresamos el tipo, las fórmulas con sus condiciones y mostramos los resultados:

#Paso 1:
h <- as.numeric(readline("INGRESE SU TIEMPO:"))

## INGRESE SU TIEMPO:

tipo<-as.character(readline("Ingrese (H) si está en horas o (M) si está en minutos:\n"))

## Ingrese (H) si está en horas o (M) si está en minutos:

#Paso 2:
tipo<-"M"
if(tipo=="H")
{seg <- (h*3600)
min<-(h*60)
cat("Su hora transformada a minutos es:",min,"\n")
cat("Su hora transformada a segundos es:",seg,"\n")}
if(tipo=="M")
{seg<-(h*60)
cat("Sus minutos transformados a segundos es:",seg,"\n")}

## Sus minutos transformados a segundos es: NA

Ejercicio 17

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

Paso 1: Asignamos el valor para 5 números:

Paso 2: Ingresamos la variable y el vector:

Paso 3: Mostramos la respuesta en forma ordenada:

#Paso 1:
n1<-as.numeric(readline("INGRESE EL PRIMER NÚMERO:"))

## INGRESE EL PRIMER NÚMERO:

# INGRESE EL PRIMER NÚMERO:
n2<-as.numeric(readline("INGRESE EL SEGUNDO NÚMERO:"))

## INGRESE EL SEGUNDO NÚMERO:

# INGRESE EL SEGUNDO NÚMERO:
n3<-as.numeric(readline("INGRESE EL TERCER NÚMERO:"))

## INGRESE EL TERCER NÚMERO:

# INGRESE EL TERCER NÚMERO:
n4<-as.numeric(readline("INGRESE EL CUARTO NÚMERO:"))

## INGRESE EL CUARTO NÚMERO:

# INGRESE EL CUARTO NÚMERO:
n5<-as.numeric(readline("INGRESE EL QUINTO NÚMERO:"))

## INGRESE EL QUINTO NÚMERO:

# INGRESE EL QUINTO NÚMERO:
#Paso 2:
números<-c(n1,n2,n3,n4,n5)
#Paso 3:
cat("Los números en orden ascendente:",sort(números))

## Los números en orden ascendente:

Ejercicio 18

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

Paso 1: Ingresamos el número a calcular:

Paso 2: Insertamos una variable para asignación y utilizamos la función factorial(x):

Paso 3: Mostramos la respuesta:

#Paso 1:
x<-as.numeric(readline("Ingrese un número: "))

## Ingrese un número:

#Paso 2:
fac<-factorial(x)
#Paso 3:
cat("El número factorial es: ",fac)

## El número factorial es:  NA

Ejercicio 19

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

Paso 1: Escribimos n:

Paso 2: Asignamos la variable x y la función seq:

Paso 3: Ponemos las condiciones correspondientes y mostramos la respuesta:

#Paso 1:
n<-100
#Paso 2: 
x <- seq(1, n)
#Paso 3:
numerosprimos=c()
numeroscompuestoa = c()
for (i in seq(2, n)) {
 if (any(x == i)) {
 
 numerosprimos <- c(numerosprimos, i)
 x<- c(x[(x %% i) != 0], i)
 }
 
 else{
 
 numeroscompuestoa = c(numeroscompuestoa, i)
 }
}

print("numerosprimos")

## [1] "numerosprimos"

print(numerosprimos)

##  [1]  2  3  5  7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97

Ejercicio 20

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

Paso 1: Ingresamos un número para saber si es par o impar:

Paso 2: Asignamos las funcionas correspondiente y mostramos su respuesta:

#Paso 1:
num<-as.numeric(readline("Ingresa un numero: "))

## Ingresa un numero:

#Paso 2:
val<-as.numeric(readline("Ingrese el numero: "))

## Ingrese el numero:

par<-val%%2==0
impar<-val%%2==1

cat("El nùmero ingresado es par: ",par)

## El nùmero ingresado es par:  NA

cat("El nùmero ingresado es impar: ",impar)

## El nùmero ingresado es impar:  NA

EJERCICIOS PROPUESTOS

Morocho Flor María, Imbaquingo Kevin, Ponce Elian, Zapata Jordan

2023-06-03

PARTE 1

A continuación presentamos ejercicios desarrollados cada uno con su respectivo procedimiento:

Ejercicio 1

Escribe un programa que solicite los catetos de un triángulo rectángulo y muestre su hipotenusa.

Paso 1: Pedimos ingresar los valores de los catetos:

Paso 2: Ingresamos la fórmula para calcular la hipotenusa:

Paso 3: Mostramos el resultado del ejercicio:

Ejercicio 2

Escribe un programa que calcule las soluciones de una ecuación de segundo grado de la forma ax^2+bx+c=0.

Para ello utilizaremos la fórmula general:

Paso 1: Pedimos ingresar los valores de a, b y c:

Paso 2: Ingresamos la fórmula:

Paso 3: Mostramos el resultado del ejercicio:

Ejercicio 3

Calcular el área del triángulo rectángulo dadas su base y altura.

Su fórmula es:

Paso 1: Ingresamos las variables área y altura:

Paso 2: Ingresamos la fórmula:

Paso 3: Mostramos el resultado del ejercicio:

Ejercicio 4

Calcular el área y perímetro de un rectángulo dado su base y altura.

Fórmula 1:

Fórmula 2:

Paso 1: Ingresamos las variables base y altura:

Paso 2: Ingresamos la fórmula del área y mostramos su resultado:

Paso 3: Ingresamos la fórmula del perímetro y mostramos su resultado:

Ejercicio 5

Calcular el promedio de 3 notas que estén entre 0 y 20.

Fórmula para el cálculo:

Paso 1: Ingresamos las notas 1, 2 y 3:

Paso 2: Ingresamos la fórmula:

Paso 3: Mostramos el resultado del ejercicio:

Ejercicio 6

Calcular el área y perímetro de la circunferencia dado el radio.

Paso 1: Ingresamos el radio de la circunferencia:

Paso 2: Ingresamos las fórmulas:

Paso 3: Mostramos el resultado del ejercicio:

Ejercicio 7

Calcular el área y perímetro de un trapecio dado su base mayor, base menor y altura.

Paso 1: Ingresamos los valores de la base menor, base mayor, altura y lados:

Paso 2: Ingresamos las fórmula para el área y mostramos su resultado:

Paso 3: Ingresamos las fórmula para el perímetro y mostramos su resultado:

Ejercicio 8

Dados dos números, determinar cual es el número mayor y cual es el número menor, si los dos números son iguales el mensaje debe decir que son números iguales.

Paso 1: Ingresamos los valores para número 1 y número 2:

Paso 2: Ingresamos las funciones y símbolos para su comparación y mostramos resultados:

Ejercicio 9

Escribe un programa que lea dos números y muestre en la salida su suma, resta, multiplicación y división.

FÓRMULA PARA SUMAR DOS NÚMEROS:

FÓRMULA PARA RESTAR DOS NÚMEROS:

FÓRMULA PARA MULTIPLICAR DOS NÚMEROS:

FÓRMULA PARA DIVIDIR DOS NÚMEROS:

Paso 1: Ingresamos los valores del número 1 y número 2:

Paso 2: Ingresamos las fórmula para cada operación y mostramos su respuesta:

Ejercicio 10

Realice un Programa que pida una cantidad en dólares y como resultado se visualice el IVA (12%) y el valor total a pagar.

Paso 1: Ingresamos el valor que deseamos calcular:

Paso 2: Multiplicamos el valor por el 0,12 y mostramos el valor del IVA:

Paso 3: Mostramos el valor total a pagar que es el valor anterior + el valor del IVA:

PARTE 2

A continuación presentamos la segunda parte de ejercicios desarrollados:

Ejercicio 11

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.

Paso 1: Ingresamos el tipo de temperatura Fahrenheit o Celsius:

Paso 2: Ingresamos la temperatura en grados:

Paso 3: Colocamos la fórmula correspondiente y mostramos la respuesta:

Ejercicio 12

Escribir un programa que pregunte al usuario por el número de horas trabajadas y el costo por hora. Después debe mostrar por pantalla la paga que le corresponde, además debe preguntar si existen horas extras que tienen un valor diferente y con estos valores se calcule la paga correspondiente.

FÓRMULA 1

FÓRMULA 2

Ejercicio 13

Escribir un programa que lea un entero positivo, n, introducido por el usuario y después muestre en pantalla la suma de todos los enteros desde 1 hasta n. La suma de los n primeros enteros positivos puede ser calculada de la siguiente forma:

Paso 1: Asignamos una variable e ingresamos su valor:

Paso 2: Ingresamos la fórmula:

Paso 3: Presentamos la respuesta:

Ejercicio 14

Escribir un programa que pida al usuario su peso (en kg) y estatura (en metros), calcule el índice de masa corporal y lo almacene en una variable, y muestre por pantalla la frase Tu índice de masa corporal es donde es el índice de masa corporal calculado redondeado con dos decimales.