-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Determine en el grupo de los 50 primeros números naturales:
- ¿Cuántos son múltiplos de 3?
- ¿Cuántos son múltiplos de 5?
- ¿Cuántos son múltiplos de 4 y de 6 al mismo tiempo?
El programa deberá mostrar cuando un número cumpla alguna de las condiciones anteriores.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Proceso MultiplosDe345Y6
multiplos_de_3 <- 0;
multiplos_de_4_y_6 <- 0;
multiplos_de_5 <- 0;
Para i<-1 Hasta 50 Con Paso 1 Hacer
Escribir "PROCESO ", i;
Si i MOD 3 = 0 Entonces
multiplos_de_3 <- multiplos_de_3+1;
Escribir "Múltiplo de 3";
FinSi
Si i MOD 4 = 0 Y i MOD 6 = 0 Entonces
multiplos_de_4_y_6 <- multiplos_de_4_y_6+1;
Escribir "Múltiplo de 4 _y 6";
FinSi
Si i MOD 5 = 0 Entonces
multiplos_de_5 <- multiplos_de_5+1;
Escribir "Múltiplo de 5";
FinSi
Escribir "";
FinPara
Escribir "Valor de multiplos de 3: ", multiplos_de_3;
Escribir "Valor de multiplos de 4 y 6: ", multiplos_de_4_y_6;
Escribir "Valor de multiplos de 5: ", multiplos_de_5;
FinProceso
multiplos_de_3 <- 0;
multiplos_de_4_y_6 <- 0;
multiplos_de_5 <- 0;
Para i<-1 Hasta 50 Con Paso 1 Hacer
Escribir "PROCESO ", i;
Si i MOD 3 = 0 Entonces
multiplos_de_3 <- multiplos_de_3+1;
Escribir "Múltiplo de 3";
FinSi
Si i MOD 4 = 0 Y i MOD 6 = 0 Entonces
multiplos_de_4_y_6 <- multiplos_de_4_y_6+1;
Escribir "Múltiplo de 4 _y 6";
FinSi
Si i MOD 5 = 0 Entonces
multiplos_de_5 <- multiplos_de_5+1;
Escribir "Múltiplo de 5";
FinSi
Escribir "";
FinPara
Escribir "Valor de multiplos de 3: ", multiplos_de_3;
Escribir "Valor de multiplos de 4 y 6: ", multiplos_de_4_y_6;
Escribir "Valor de multiplos de 5: ", multiplos_de_5;
FinProceso