1. Escribir un algoritmo que pida al usuario un número entero que será el
número de filas a generar y muestre por pantalla un triángulo rectángulo
como el de más abajo. Ejemplo si el usuario ingresa el 5 se genera el
triángulo rectángulo de 5 filas de solo números pares
10 8 6 4 2
8 6 4 2
642
42
2
Respuestas a la pregunta
A continuación algoritmo y diagrama de flujo en pseint que muestra por pantalla triángulo dibujado con números.
Algoritmo en pseint que dibuja triangulo rectángulo con números pares
- //Definir variables
Definir num, resto como Entero;
Escribir "Programa que genera y muestra un triángulo rectángulo"
Escribir "*********************************************";
- //Ingresar datos
Escribir '¿Cuál es su número?'
Leer num;
x <- num
Para a<-1 Hasta num Hacer
x <- x-1
Para b<-1 Hasta x+1 Hacer
Repetir
- //Tenemos que generar números de manera aleatoria
numeroPar <- azar(10)
- //numeroPar debe ser divisible por 2, entonces el resto tiene que ser cero
resto <- numeroPar MOD 2
- //Imprimir numero si es par, diferente de cero y si no es el último de la línea no de retorno de carro
Si (resto == 0) y (numeroPar <> 0) y (b < x+1) Entonces
Escribir numeroPar, " " Sin Saltar
sino
- //Imprimir numero si es par, diferente de cero y si es el último haga retorno de carro (enter)
si (resto == 0) y (numeroPar <> 0) Entonces
Escribir numeroPar, " "
FinSi
FinSi
Hasta Que (resto == 0) y (numeroPar <> 0)
FinPara
FinPara
FinAlgoritmo
Para saber más acerca de algoritmo para dibujar figuras geométricas consulte: https://brainly.lat/tarea/820667
Respuesta:
Explicación:
Proceso rectacgulo
Definir num,X,resto,a,b,numeroPar como Entero;
Escribir "Programa que genera y muestra un triángulo rectángulo";
Escribir "*********************************************";
//Ingresar datos
Escribir '¿Cuál es su número?';
Leer num;
x <- num;
Para a<-1 Hasta num Hacer
x <- x-1 ;
Para b<-1 Hasta x+1 Hacer
Repetir
//Tenemos que generar números de manera aleatoria
numeroPar <- azar(10);
//numeroPar debe ser divisible por 2, entonces el resto tiene que ser cero
resto <- numeroPar MOD 2;
//Imprimir numero si es par, diferente de cero y si no es el último de la línea no de retorno de carro
Si (resto == 0) y (numeroPar <> 0) y (b < x+1) Entonces
Escribir numeroPar, " " Sin Saltar;
sino
//Imprimir numero si es par, diferente de cero y si es el último haga retorno de carro (enter)
si (resto == 0) y (numeroPar <> 0) Entonces
Escribir numeroPar, " ";
FinSi
FinSi
Hasta Que (resto == 0) y (numeroPar <> 0)
FinPara
FinPara
FinProceso