Question

Desarrolla Algoritmos en Pseudocódigo, utilizando PSeInt:

• Arreglos unidimensionales y bidimensionales.
• Funciones (subrutinas).


Item I: Desarrollo en pseudocódigo
1. Construir un algoritmo que permita obtener el promedio de 3 notas. Éste debe ser aplicado para cada alumno de un curso de 10 alumnos. Las notas están guardadas en una matriz de 10 filas, con 4 columnas, la primera columna se utiliza para guardar el número de la lista del alumno.

( Observaciones: las notas deben ser almacenadas previamente en una matriz denominada NOTAS.)


2. Construir una función que permita mostrar el perímetro de un triángulo cualquiera.


3. Construir una función que permita retornar el área de un triángulo cualquiera.


4. Construir una función que permita retornar si un número es primo o no, el retorno debe ser lógico (Verdadero o Falso)


5. Construir una función que permita retornar si un número es perfecto o no, el retorno debe ser lógico (Verdadero o Falso)

Answer 1

Ejercicio 1

Algoritmo NotasAlumnos

Nota=3

Alumno=10

Dimension NOTAS[Alumno,Nota]

Escribir "***NOTAS***"

Para i<-0 Hasta Alumno-1 Con Paso 1 Hacer

 Escribir "Alumno ",(i+1),": " Sin Saltar

 Para j<-0 Hasta Nota-1 Con Paso 1 Hacer

  num= Aleatorio(1, 10)

  NOTAS(i, j)=num

  Escribir NOTAS(i,j) , " " Sin Saltar

 Fin Para

 Escribir ""

Fin Para

Escribir ""

Escribir "***PROMEDIOS***"

Para i<-0 Hasta Alumno-1 Con Paso 1 Hacer

 acu=0

 Para j<-0 Hasta Nota-1 Con Paso 1 Hacer

  acu=NOTAS[i,0]+NOTAS[i,1]+NOTAS[i,2]

  prom=acu/3

 Fin Para

 Escribir "Promedio Del Alumno ",i+1," Es ",prom

Fin Para

FinAlgoritmo

--------------------------------------------------------------------------------------------

Ejercicio 2

Funcion Perimetro <- PTriangulo ( L,L2,L3 )

Perimetro=L+L2+L3

Fin Funcion

Algoritmo PerimetroTriangulo

Escribir "Ingrese El Lado 1"

Leer L

Escribir "Ingrese El Lado 2"

Leer L2

Escribir "Ingrese El Lado 3"

Leer L3

Escribir "Perimetro Del Triangulo: ",PTriangulo(L,L2,L3)

FinAlgoritmo

--------------------------------------------------------------------------------------------

Ejercicio 3

Funcion Area <- ATriangulo ( Base,Altura)

Area=(Base*Altura)/2

Fin Funcion

Algoritmo AreaTriangulo

Escribir "Ingrese La Base"

Leer Base

Escribir "Ingrese La Altura"

Leer Altura

Escribir "Area Del Triangulo: ",ATriangulo(Base,Altura)

FinAlgoritmo

--------------------------------------------------------------------------------------------

Ejercicio4

Funcion Num <- EsNumeroPrimo (n1)

cont=0

Para i<-1 Hasta n1 Hacer

 Si n1%i==0 Entonces

  cont=cont+1

 FinSi

Fin Para

Si cont==2 Entonces

 Escribir Verdadero

SiNo

 Escribir Falso

FinSi

Fin Funcion

Algoritmo FuncionesEjemplos

Escribir "Ingrese Un Numero"

Leer n1

Escribir EsNumeroPrimo(n1)

FinAlgoritmo

--------------------------------------------------------------------------------------------

Ejercicio5

Funcion Num <- EsNumeroPerfecto (n)

sum=0

Para i<-1 Hasta n-1 Hacer

 Si n%i==0 Entonces

  sum=sum+i

 FinSi

Fin Para

Si sum==n Entonces

 Escribir Verdadero

SiNo

 Escribir Falso

FinSi

Fin Funcion

Algoritmo NumeroPerfecto

Escribir "Ingrese Un Numero"

Leer n

Escribir EsNumeroPerfecto(n)

FinAlgoritmo