Buenas tardes profesor, base2 a base 10 pero con estructura repetitiva Alumnos: - Kevin Guerrero López - Andruh Chiroque Calderón Proceso BASE2 Definir i, bit1, bit2, bit3, bit4, bit5, bit6, bit7, bit8 Como Entero bit1 = 0 bit2 = 0 bit3 = 0 bit4 = 0 bit5 = 0 bit6 = 0 bit7 = 0 bit8 = 0 Repetir Escribir " Ingresar numero base 10 <0 y 255>:" Leer numero Si numero > 255 o numero < 0 Entonces Escribir "Numero incorrecto... Presiona tecla" Esperar Tecla Limpiar Pantalla FinSi Hasta Que numero > 0 y numero <= 255 i=8 Repetir Si numero >= 2 Entonces Segun i Hacer 1: bit1 = numero % 2 2: bit2 = numero % 2 3: bit3 = numero % 2 4: bit4 = numero % 2 5: bit5 = numero % 2 6: bit6 = numero % 2 7: bit7 = numero % 2 8: bit8 = numero % 2 FinSegun numero = trunc (numero/2) i= i - 1 Si i > 1 Entonces Segun i Hacer 2: bit2 = numero 3: bit3 = numero 4: bit4 = numero 5: bit5 = numero 6: bit6 = numero 7: bit7 = numero 8: bit8 = numero FinSegun SiNo bit1 = numero FinSi FinSi Hasta Que numero < 2 Escribir "El número binario es: " bit1, bit2, bit3, bit4, bit5, bit6, bit7, bit8 FinProceso
Si i > 1 Entonces Segun i Hacer 2: bit2 = numero 3: bit3 = numero 4: bit4 = numero 5: bit5 = numero 6: bit6 = numero 7: bit7 = numero 8: bit8 = numero FinSegun SiNo bit1 = numero FinSi Esta porción debe estar fuera de la estrucutura repetitiva
Neiber Yair Pérez Flores U23228364 aula: 0302 9.45-11.15 Proceso base10base2 Definir i, numero como entero definir bit1,bit2,bit3,bit4,bit5,bit6,bit7,bit8 como entero bit1 <- 0 bit2 <- 0 bit3 <- 0 bit4 <- 0 bit5 <- 0 bit6 <- 0 bit7 <- 0 bit8 <- 0 Repetir Escribir "Ingrese número de base 10 <0 y 255>:" Leer numero Si numero < 0 o numero > 255 Escribir "Error numero fuera de rango... presione tecla" Esperar Tecla Limpiar Pantalla FinSi Hasta Que numero >= 0 y numero <= 255 i <- 8 Repetir Segun i Hacer 8:bit8 <- numero % 2 7:bit7 <- numero % 2 6:bit6 <- numero % 2 5:bit5 <- numero % 2 4:bit4 <- numero % 2 3:bit3 <- numero % 2 2:bit2 <- numero % 2 1:bit1 <- numero % 2 FinSegun numero <- Trunc(numero / 2) i <- i - 1 Hasta Que i = 0 Escribir "Bits individuales:" Escribir "bit1=", bit1 Escribir "bit2=", bit2 Escribir "bit3=", bit3 Escribir "bit4=", bit4 Escribir "bit5=", bit5 Escribir "bit6=", bit6 Escribir "bit7=", bit7 Escribir "bit8=", bit8 FinProceso
Algoritmo CalcularPromedioNotas // Obtener el número de estudiantes Repetir Escribir "Ingrese el número de estudiantes (n): " Leer n Hasta que n > 0 // Inicializar variables i = 1 sumaNotas = 0 // Ciclo para cada estudiante Mientras i <= n Hacer // Inicializar variables para el estudiante actual j = 1 sumaNotasEstudiante = 0 // Ciclo para obtener las notas del estudiante Mientras j <= 5 Hacer // Obtener la nota del estudiante Repetir Escribir "Ingrese la nota ", j, " del estudiante ", i, ": " Leer nota Hasta que nota >= 0 y nota <= 20 // Acumular la suma de las notas sumaNotasEstudiante = sumaNotasEstudiante + nota j = j + 1 Fin Mientras // Calcular el promedio del estudiante promedioEstudiante = sumaNotasEstudiante / 5 // Mostrar el promedio del estudiante Escribir "El promedio del estudiante ", i, " es: ", promedioEstudiante // Verificar si el estudiante aprobó Si promedioEstudiante >= 11.5 Entonces Escribir "El estudiante ", i, " ha aprobado" Sino Escribir "El estudiante ", i, " ha desaprobado" Fin Si // Acumular la suma de las notas de todos los estudiantes sumaNotas = sumaNotas + sumaNotasEstudiante i = i + 1 Fin Mientras // Calcular el promedio general promedioGeneral = sumaNotas / (n * 5) // Mostrar el promedio general Escribir "El promedio general de la clase es: ", promedioGeneral Fin Algoritmo Alumnos: Christofer colunche García Prada Acosta Caleb Ramiro
Profesor aquí está el algoritmo con la variable REPETIR en lugar de MIENTRAS que indicó en clase: Proceso Base10aBase2 Definir i, numero Como Entero Definir bit1, bit2, bit3, bit4, bit5, bit6, bit7, bit8 Como Entero bit1 <- 0 bit2 <- 0 bit3 <- 0 bit4 <- 0 bit5 <- 0 bit6 <- 0 bit7 <- 0 bit8 <- 0 Repetir Escribir "Ingrese número de base 10 <0 y 255>:" Leer numero Si numero <0 o numero >255 Entonces Escribir "Error número fuera de alcance: ..... Presione tecla" Esperar Tecla Limpiar Pantalla FinSi Hasta Que numero >= 0 y numero <= 255 i <- 8 Repetir Segun i Hacer 1: bit1 <- numero % 2 2: bit2 <- numero % 2 3: bit3 <- numero % 2 4: bit4 <- numero % 2 5: bit5 <- numero % 2 6: bit6 <- numero % 2 7: bit7 <- numero % 2 8: bit8 <- numero % 2 FinSegun numero <- trunc(numero / 2) i <- i - 1 Hasta Que numero < 2 Si i > 1 Entonces Segun i Hacer 2: bit2 <- numero 3: bit3 <- numero 4: bit4 <- numero 5: bit5 <- numero 6: bit6 <- numero 7: bit7 <- numero 8: bit8 <- numero FinSegun SiNo bit1 <- numero FinSi Escribir "Número en binario es: ", bit1, bit2, bit3, bit4, bit5, bit6, bit7, bit8 FinProceso Además me indico que porque en la parte final se utilizaba esa secuencia y es porque esta sección del código es un mecanismo de seguridad que garantiza la correcta asignación de bits en el caso de que el ciclo principal de conversión deje bits significativos sin asignar. Nombres: DIEGO ALONSO OCUPA NEIRA Y DIEGO TELLO MANAYALLE
profe yo con unos compañeros del aula hicimos el mismo problema con el siguiente pseudocódigo: Algoritmo NBinario Definir n, binario, base, resto, num, i Como Entero Definir binarioTexto Como Cadena escribir "ingrese un numero del 1-255" leer n repetir si n < 1 o n > 255 Entonces Limpiar Pantalla escribir "ERROR" Esperar 2 Segundos Limpiar Pantalla escribir "numero fuera de los limites, ingrese un numero del 1-255" leer n FinSi hasta que n <= 255 y n >= 1 num <- n base <- 1 binario <- 0 binarioTexto <- "" Mientras n > 0 Hacer resto <- n MOD 2 binario <- binario + resto * base n <- trunc(n / 2) base <- base * 10 FinMientras binarioTexto <- ConvertirAtexto(binario) Mientras Longitud(binarioTexto) < 8 Hacer binarioTexto <- Concatenar("0", binarioTexto) FinMientras Escribir "El número ",num," a binario es: ", binarioTexto FinAlgoritmo
Excelente! me imagino que viste la diferencia, no uso funciones tales como Concatenar, ConvertirATexto entre otras, pero cuentame que te parece el ejemplo mostrado
