Planteamiento 30


Calcular el factorial de un número leído desde el teclado, utilizar la sentencia Para.

Análisis del Problema
Leer numero

factor = numero * (numero -1) * (numero -2)

Pseudocódigo
1Proceso Factorial
2 Escribir "Ingrese un numero para obtener su factorial:"
3 Leer numero
4 x <- 1
5 Para i <- numero hasta 1 Hacer
6 Escribir sin saltar i, "*";
7 x <- x * i
8 FinPara
9 Escribir "El factorial es: ", x;
10Finproceso




Diagrama de Flujo


Planteamiento 29

Un número primo es un entero que no tiene más divisores que el mismo y la unidad. Por ejemplo 5 es primo ya que solo tiene como divisores 5 y 1; 24 no es primo ya que tiene como divisores a 24, 1, 2, 3. 24 es compuesto.

Realizar el programa que indique si un número ingresado es primo o compuesto.

Análisis del Problema
leer x
si x=1 Entonces
Escribir "el numero es primo"
Sino
a<-0
para i<-1 Hasta x Hacer
si x mod i=0 Entonces
a<-a+1
FinSi

Pseudocódigo
1Proceso numero_primo
2 Escribir "ingrese el numero"
3 leer x
4 si x=1 Entonces
5 Escribir "el numero es primo"
6 Sino
7 a<-0
8 para i<-1 Hasta x Hacer
9 si x mod i=0 Entonces
10 a<-a+1
11 FinSi
12 FinPara
13 si a=2 Entonces
14 Escribir "el numero es primo" 
15 sino 
16 Escribir "el numero es compuesto"
17 FinSi
18 FinSi
19FinProceso



Diagrama de Flujo


Planteamiento 28


Solicitar al usuario ingrese un número entero entre 1 y 100, luego en pantalla ha de mostrar el rango de números comprendidos por el número ingresado , además la sumatoria de la serie comprendida por los números (suma sucesiva). Ejemplo: Si el usuario ingresa el 10, en pantalla apareceran los números 1 2 3 4 5 6 7 8 9 10 y la suma sucesiva es :55


Análisis del Problema
x <- x + i

Asi que (x) es la variable ingresada. (i) viene siendo la secuencia de números

Pseudocódigo

1Proceso suma
2 Escribir "Ingrese un numero:"
3 Leer numero
4 x <- 0
5 Para i <- 1 hasta numero Hacer
6 Escribir sin saltar i, "+";
7 x <- x + i
8 FinPara
9 Escribir "La suma es: ", x;
10Finproceso

Diagrama de Flujo



Planteamiento 27


a.) Realizar el programa que muestre los números pares comprendidos entre el rango de 1 a 50. Emplear el ciclo Para.

b.) Luego muestre los impares comprendidos entre el rango de 50 a 100 con el ciclo repetir.

Análisis del Problema
Para x <- 0 hasta 50 con paso 2 Hacer

Repetir
acumulador <- acumulador + 2

Pseudocódigo

1Proceso Muestra_numeros
2 acumulador = 49
3 Para x <- 0 hasta 50 con paso 2 Hacer
4 Escribir Sin Saltar x, " ,"
5 Finpara
6 Escribir ""
7 Escribir ""
8 Repetir
9 acumulador <- acumulador + 2
10 Escribir Sin Saltar acumulador, ", "
11 Hasta Que acumulador = 99
12FinProceso


Diagrama de Flujo


Planteamiento 11


Diseñar el programa que solicite el ingreso de 3 números enteros, posterior a ello, mostrar cual fue el mayor y cual fue el menor. Por ejemplo: 3 50 14, el número menor fue 3 y el mayor fue 50.

Análisis del Problema
(a < b) y (a < c), si esto es verdadero se mostrara "a" como menor.

Pseudocódigo




1Proceso Mayor_y_Menor
2 Escribir "Ingrese tres numeros:"
3 Leer a,b,c
4 Si (a < b) y (a < c) Entonces
5 Escribir "El menor es: ",a;
6 Finsi
7 Si (b < a) y (b < c) Entonces
8 Escribir "El menor es: ",b;
9 Fin si
10 Si (c < a) y (c < b) Entonces
11 Escribir "El menor es: ",c;
12 Finsi
13 Si (a > b) y (a > c) Entonces
14 Escribir "El mayor es: ",a;
15 Finsi
16 Si (b > a) y (b > c) Entonces
17 Escribir "El mayor es: ",b;
18 Fin si
19 Si (c > a) y (c > b) Entonces
20 Escribir "El mayor es: ",c;
21 Finsi
22FinProceso


Diagrama de Flujo



Planteamiento 25


Escribir un programa que determine si un año es bisiesto. Un año bisiesto si es múltiplo de 4 (por ejemplo, 1984). Los años múltiplos de 100 no son bisiestos, salvo si ellos son también múltiplos de 400 (2000 es bisiesto, 1800 no lo es).

Análisis del Problema
year Mod 4 = 0 y year mod 100 <> 0 o year mod  400 = 0

Pseudocódigo

1Proceso bisiesto
2 Escribir "Ingrese el año a comparar:"
3 Leer year
4 Si year Mod 4 = 0 y year mod 100 <> 0 o year mod  400 = 0 Entonces
5 Escribir "Año Bisiesto"
6 Sino
7 Escribir "Año no bisiesto"
8 Fin si
9FinProceso 


Diagrama de Flujo


Planteamiento 22

Una temperatura Celcius (centígrados) C puede ser convertida a una temperatura equivalente F de acuerdo a la siguiente formula:

f={9/5} * c + 32

Escribir un programa que lea una temperatura Celcius como número decimal y obtenga la temperatura Fahrenheit equivalente

Análisis del Problema
f = ( ( 9 / 5 ) * celcius ) + 32

Pseudocódigo

1Proceso celcius
2 Escribir "Ingrese una cantidad en grados celcius:"
3 Leer celcius
4 f = ( ( 9 / 5 ) * celcius ) + 32
5 Escribir "Esto equivale a ", f, " grados fahrenheit"
6FinProceso

Diagrama de Flujo


Planteamiento 21


Un numero perfecto es un número positivo, que es igual a la suma de todos los enteros positivos (excluido el mismo) que son divisores del numero, el primer numero perfecto es 6, ya que los divisores de 6 son 1,2,3 y 1+2+3 = 6.

Escribir un programa que encuentre los tres primeros numeros enteros,

Análisis del Problema
n = 2:   21 × (22 – 1) = 6
n = 3:   22 × (23 – 1) = 28
n = 5:   24 × (25 – 1) = 496
n = 7:   26 × (27 – 1) = 8128

Pseudocódigo

1Proceso numero_perfecto
2 Escribir "¿Quieres conocer tres numeros perfectos? (s/n)"
3 Leer res
4 Si (res = "s") o (res = "S") Entonces
5 pr1 = (2^2) * (2^3 - 1)
6 pr2 = (2^4) * (2^5 - 1)
7 pr3 = (2^6) * (2^7 - 1)
8 Escribir Sin Saltar pr1, " ,", pr2, " ,", pr3
9 Finsi
10FinProceso



Diagrama de Flujo



Planteamiento 20


Solicitar un número natural (n) entre 1 y 20 con el cual se ha de mostrar en pantalla la tabla de multiplicar, con el formato: 
                              n * 1 = respuesta
                              n * 2 = respuesta
                                        .
                                        .
                              n * 2 = respuesta

Análisis del Problema
Si <condicion = verdadera> entonces
   para <variable> <- <inicial> hasta <final> hacer
        <instruccion>
Finpara
Sino
    <instruccion2>
Finsi

Pseudocódigo


1Proceso multiplicar
2 Escribir "Ingrese un numero entre 1 y 20:"
3 Leer numero
4 Si (numero >= 1) y (numero <= 20) entonces
5 Para x <- 1 hasta 10 hacer
6 Escribir  numero, " * ", x,  " = ", numero * x;
7 Fin Para
8Sino
9 Escribir "ERROR"
10 Finsi
11FinProceso


Diagrama de Flujo


Planteamiento 19


Escribir el algoritmo que permita escribir en pantalla la frase "¿Desea Continuar? (s/n)", hasta que la respuesta sea "s" o "n". Emplear la estructura repetitiva Repetir.

Análisis del Problema
Repetir
   <instruccion1>
   <instruccion2>
Hasta que <condicion = verdadera>
Pseudocódigo

1Proceso Continuar
2 Repetir
3 Limpiar Pantalla
4 Escribir "¿Desea continuar (S / N)?"
5 Leer respuesta
6 Hasta que (respuesta = "n") o (respuesta = "N") o (respuesta = "s") o (respuesta = "S")
7FinProceso



Diagrama de Flujo




Planteamiento 18


Solicitar se ingrese una letra del abecedario, y cuando el programa encuentre una vocal (a,e,i,o,u) el programa se detendrá, y mostrará la vocal que ingresó, si no se ingresa una vocal, el programa deberá de seguir funcionando. Utilizar la estructura repetitiva Repetir.

Análisis del Problema
Repetir
     <instrucciones1>
     <instrucciones2>
Hasta Que <condicion = verdadera>

Pseudocódigo

1Proceso letra
2             Repetir
3                             Limpiar Pantalla
4                             Escribir "Ingrese una letra:"
5                             Leer letra
6             Hasta que (letra = "a") o (letra = "e") o (letra = "i") o (letra = "o") o (letra = "u")
7             Escribir "Usted ingreso la letra :  " ,letra;
8FinProceso



Diagrama de Flujo



Planteamiento 16


Mostrar en pantalla las treinta primeras potencias de 4, es decir, 4 elevado a la 1, 4 elevado a la 2, etc. Emplear la estructura repetitiva Para.

Análisis del Problema
Para <variable> <- <inicial> Hasta <final> Hacer
   instrucciones
FinPara

Pseudocódigo

1Proceso potencias
2             Para x <- 1 hasta 30 hacer
3                             Escribir  "4 ^ ", x,  " = ", 4 ^ x;
4             Fin Para
5FinProceso


Diagrama de Flujo





Planteamiento 15


Diseñar el algoritmo que solicite al usuario, un número entero entre el rango de 1 a 100, y utilizando la estructura Para mostrar los número (hasta el limite del usuaruo) en forma ascendente y descendente.

Análisis del Problema
Para <variable> <- inicial Hasta <final> Hacer
instrucciones
FinPara

Pseudocódigo

1Proceso numero
2             Escribir "Ingrese un numero del 1 al 100:"
3             Leer n
4             Escribir "Ingrese un limite:"
5             Leer l
6             Escribir "Forma Ascendente:"
7             Para contador <- n + 1 hasta l Hacer
8                             Escribir Sin Saltar contador, " "
9             Fin para
10           Escribir ""
11           Escribir ""
12           Escribir "Forma descendente:"
13           Para contador2 <- n - 1 hasta 1 Hacer
14                           Escribir Sin Saltar contador2, " "
15           Fin Para
16FinProceso



Diagrama de Flujo


Planteamiento 14


Los empleados de una fábrica trabajan en dos turnos: diurno y nocturno. Y la fábrica necesita que diseñe el programa que pueda calcular el jornal diario de acuerdo con los siguientes puntos:

1. La tarifa de las horas diurnas es de Q. 9.00
2. La tarifa de las horas nocturnas es de Q. 12.00
3. En caso de ser domingo, la tarifa se incrementará en Q. 3.00 las horas diurnas y Q. 4.00 las horas nocturnas.

El programa deberá de leer lo siguiente:
  • Nombre del trabajador
  • Nombre del turno
  • Horas trabajadas
  • Dia de la semana (1 - 7) donde 1 sea lunes


Análisis del Problema
El jornal se sacará de la operación 

horas trabajadas X tipo de turno Según dia de la semana

Pseudocódigo

1Proceso ingreso
2             Escribir " Ingrese su nombre:"
3             Leer nombre
4             Escribir " Tipo de turno (diurno o nocturno):"
5             Leer tipo
6             Escribir " Dia de la semana (Siendo lunes el dia 1):"
7             Leer dia
8             Escribir " Horas trabajadas"
9             Leer horas
10           Escribir ""
11           Si tipo = "diurno" Entonces
12                           pago = horas * 9
13           FinSi
14           Si tipo = "nocturno" Entonces
15                           pago = horas * 12
16           Finsi
17           Si (dia = "7") y (tipo = "diurno") Entonces
18                           pago = horas * 12
19           Finsi      
20           Si (dia = "7") y (tipo = "nocturno") Entonces
21                           pago = horas * 16
22           Finsi      
23           Escribir nombre, ", su pago es de:  Q.", pago;
24FinProceso


Diagrama de Flujo




Planteamiento 13


Solicitar un número arabigo de 2 cifras entre el rango de 1 a 20 con el cual después de haber ingresado el número, muestre en pantalla la siguiente información:

                a) Si el número es positivo o negativo
                b) Si el número es par o impar
                c) El número escrito en letras (español)
                d) El número escrito en letras (inglés)
                e) El número escrito en su equivalente en la numeración romana 

Emplear para la solución la estructura condicional múltiple Según.

Análisis del Problema
Segun <variable> Hacer
<número1>: Instrucciones
<número2>: Instrucciones
   .
   .
   .
De Otro Modo: Instrucciones
FinSegun

Pseudocódigo

1 Proceso menu
2 Escribir "Ingrese un numero entero (positivo o negativo):"
3 Leer numero
4 Segun numero Hacer
5                               -20: Escribir " Negativo"
6                                               Escribir " Par"
7                                               Escribir " Menos Veinte"
8                                               Escribir " Twenty Negative"
9                                               Escribir " - XX"
10                              -19: Escribir " Negativo"
11                                              Escribir " Impar"
12                                              Escribir " Menos Diecinueve"
13                                              Escribir " Nineteen Negative"
14                                              Escribir " - XIX"
15                              -18: Escribir " Negativo"
16                                              Escribir " Par"
17                                              Escribir " Menos Dieciocho"
18                                              Escribir " Eigthteen Negative"
19                                              Escribir " - XVIII"
20                              -17: Escribir " Negativo"
21                                              Escribir " Impar"
22                                              Escribir " Menos Diecisiete"
23                                              Escribir " Seventeen Negative"
24                                              Escribir " - XVII"
25                              -16: Escribir " Negativo"
26                                              Escribir " Par"
27                                              Escribir " Menos Dieciseis"
28                                              Escribir " Sixteen Negative"
29                                              Escribir " - XVI"
30                              -15: Escribir " Negativo"
31                                              Escribir " Impar"
32                                              Escribir " Menos Quince"
33                                              Escribir " Fifteen Negative"
34                                              Escribir " - XV"
35                              -14: Escribir " Negativo"
36                                              Escribir " Par"
37                                              Escribir " Menos Catorce"
38                                              Escribir " Fourteen Negative"
39                                              Escribir " - XIV"
40                              -13: Escribir " Negativo"
41                                              Escribir " Impar"
42                                              Escribir " Menos Trece"
43                                              Escribir " Thirteen Negative"
44                                              Escribir " - XIII"
45                              -12: Escribir " Negativo"
46                                              Escribir " Par"
47                                              Escribir " Menos Doce"
48                                              Escribir " Twelve Negative"
49                                              Escribir " - XII"
50                              -11: Escribir " Negativo"
51                                              Escribir " Impar"
52                                              Escribir " Menos Once"
53                                              Escribir " Eleven Negative"
54                                              Escribir " - XI"
55                              -10: Escribir " Negativo"
56                                              Escribir " Par"
57                                              Escribir " Menos Diez"
58                                              Escribir " Teen Negative"
59                                              Escribir " - X"
60                              -9: Escribir " Negativo"
61                                              Escribir " Impar"
62                                              Escribir " Menos Nueve"
63                                              Escribir " Nine Negative"
64                                              Escribir " - IX"
65                              -8: Escribir " Negativo"
66                                              Escribir " Par"
67                                              Escribir " Menos Ocho"
68                                              Escribir " Eigth Negative"
69                                              Escribir " - VIII"
70                              -7: Escribir " Negativo"
71                                              Escribir " Impar"
72                                              Escribir " Menos Siete"
73                                              Escribir " Seven Negative"
74                                              Escribir " - VII"
75                              -6: Escribir " Negativo"
76                                              Escribir " Par"
77                                              Escribir " Menos Seis"
78                                              Escribir " Six Negative"
79                                              Escribir " - VI"
80                              -5: Escribir " Negativo"
81                                              Escribir " Impar"
82                                              Escribir " Menos Cinco"
83                                              Escribir " Five Negative"
84                                              Escribir " - X"
85                              -4: Escribir " Negativo"
86                                              Escribir " Par"
87                                              Escribir " Menos Cuatro"
88                                              Escribir " Four Negative"
89                                              Escribir " - IV"
90                              -3: Escribir " Negativo"
91                                              Escribir " Impar"
92                                              Escribir " Menos Tres"
93                                              Escribir " Three Negative"
94                                              Escribir " - III"
95                              -2: Escribir " Negativo"
96                                              Escribir " Par"
97                                              Escribir " Menos Dos"
98                                              Escribir " Two Negative"
99                                              Escribir " - II"
100                            -1: Escribir " Negativo"
101                                            Escribir " Impar"
102                                            Escribir " Menos Uno"
103                                            Escribir " One Negative"
104                                            Escribir " - I"
105                            1:  Escribir " Positivo"
106                                            Escribir " Impar"
107                                            Escribir " Uno"
108                                            Escribir " One"
109                                            Escribir " I"
110                            2:  Escribir " Positivo"
111                                            Escribir " Par"
112                                            Escribir " Dos"
113                                            Escribir " Two"
114                                            Escribir " II"
115                            3:  Escribir " Positivo"
116                                            Escribir " Impar"
117                                            Escribir " Tres"
118                                            Escribir " Three"
119                                            Escribir " III"
120                            4:  Escribir " Positivo"
121                                            Escribir " Par"
122                                            Escribir " Cuatro"
123                                            Escribir " Four"
124                                            Escribir " IV"
125                            5:  Escribir " Positivo"
126                                            Escribir " Impar"
127                                            Escribir " Cinco"
128                                            Escribir " Five"
129                                            Escribir " V"
130                            6:  Escribir " Positivo"
131                                            Escribir " Par"
132                                            Escribir " Seis"
133                                            Escribir " Six"
134                                            Escribir " VI"
135                            7:  Escribir " Positivo"
136                                            Escribir " Impar"
137                                            Escribir " Siete"
138                                            Escribir " Seven"
139                                            Escribir " VII"
140                            8:  Escribir " Positivo"
141                                            Escribir " Par"
142                                            Escribir " Ocho"
143                                            Escribir " Eigth"
144                                            Escribir " VIII"
145                            9:  Escribir " Positivo"
146                                            Escribir " Impar"
147                                            Escribir " Nueve"
148                                            Escribir " Nine"
149                                            Escribir " IX"
150                            10:  Escribir " Positivo"
151                                            Escribir " Par"
152                                            Escribir " Diez"
153                                            Escribir " Ten"
154                                            Escribir " X"
155                            11:  Escribir " Positivo"
156                                            Escribir " Impar"
157                                            Escribir " Once"
158                                            Escribir " Eleven"
159                                            Escribir " XI"
160                            12:  Escribir " Positivo"
161                                            Escribir " Par"
162                                            Escribir " Doce"
163                                            Escribir " Twelve"
164                                            Escribir " XII"
165                            13:  Escribir " Positivo"
166                                            Escribir " Impar"
167                                            Escribir " Trece"
168                                            Escribir " Thirteen"
169                                            Escribir " XIII"
170                            14:  Escribir " Positivo"
171                                            Escribir " Par"
172                                            Escribir " Catorce"
173                                            Escribir " Fourteen"
174                                            Escribir " XIV"
175                            15:  Escribir " Positivo"
176                                            Escribir " Impar"
177                                            Escribir " Quince"
178                                            Escribir " Fivteen"
179                                            Escribir " XV"
180                            16:  Escribir " Positivo"
181                                            Escribir " Par"
182                                            Escribir " Dieciseis"
183                                            Escribir " Sixteen"
184                                            Escribir " XVI"
185                            17:  Escribir " Positivo"
186                                            Escribir " Impar"
187                                            Escribir " Diecisiete"
188                                            Escribir " Seventeen"
189                                            Escribir " XVII"
190                            18:  Escribir " Positivo"
191                                            Escribir " Par"
192                                            Escribir " Dieciocho"
193                                            Escribir " Eigthteen"
194                                            Escribir " XVIII"
195                            19:  Escribir " Positivo"
196                                            Escribir " Impar"
197                                            Escribir " Diecinueve"
198                                            Escribir " Nineteen"
199                                            Escribir " XIX"
200                            20:  Escribir " Positivo"
201                                            Escribir " Par"
202                                            Escribir " Veinte"
203                                            Escribir " Twenty"
204                                            Escribir " XX"
205                            De Otro Modo:
206                                            Escribir "Numero Erroneo"
207            Finsegun
208 FinProceso

Diagrama de Flujo