Programacion
Programacion
INICIO
ENTERO par, impar, positivo, negativo=0;
PARA i desde 1 hasta 50
LEER num
SI num%2= 0
par = par + 1
SI NO
Impar=impar+1
FIN SI
SI num > 0
positivo=positivo + 1
SI NO
SI num < 0
negativo=negativo + 1
FIN SI
FIN PARA
IMPRIMIR par, impar, positivo, negativo
FIN
INICIO
ESCRIBIR “digite nombre del empleado”
LEER e
ESCRIBIR “digite numero de horas trabajadas”
LEER h
ESCRIBIR “digite el valor de las horas trabajadas”
LEER v
Sal <-(h * v);
ESCRIBIR “empleado”, e, “su salario es: “ ,sal,””
FIN
INCIO
DEFINIR monto, descuento
LEER monto
SI monto > 100 ENTONCES
Descuento < monto * 10/100
SI NO
Descuento < monto * 2/100
FIN SI
IMPRIMIR monto, descuento
FIN
INICIO
LEER n
Suma= 0
PARA i= 8 HASTA n INCREMENTO 1
Suma= suma+i
FIN_PARA
ESCRIBIR suma
FIN
INICIO
DEFINA N, resultado
LEA N
HAGA = 3^N
IMPRIME resultado
FIN
11. Construya un algoritmo que convierta grados Celsius a grados Fahrenheit.
La entrada del usuario es la temperatura Fahrenheit. La relación es:
F = (9/5) C 32
Donde:
C = Temperatura en Celsius
F = Temperatura en Fahrenheit
DEFINE c, f
ESCRIBIR “ingrese los grados C: "
LEER c
f=(9.0/5.0)*c+32.0;
ESCRIBIR “los grados f: ",f
FIN
El coste total.
El coste total menos la deducción del segundo.
El coste total menos el coste de las medicinas y la deducción.
13. La calificación de Química se obtiene de la sig. Manera:
Examen 85%
Promedio de tareas 15%
En esta materia se pidió un promedio de tres tareas. Diseñe el algoritmo para
resolver el anterior problema.
INICIO
Taf Ex, t1, t2 ,t3, NF
LEER t1, t2, t3, Ex
HAGA NF= [ ( t1 + t2 + t3 ) ] * 0.15 + Ex * 0.85
IMPRIMIR NF
FIN
14. Una persona se encuentra con un problema de comprar un automóvil o
un terreno, los cuales cuestan exactamente lo mismo. Sabe que mientras el
automóvil se devalúa, con el terreno sucede lo contrario. Esta persona
comprara el automóvil si al cabo de tres años la devaluación de este no es
mayor que la mitad del incremento del valor del terreno. Ayúdale a esta
persona a determinar si debe o no comprar el automóvil.
INICIO
DEFINE Da, It
LEER Da, It
SI (Da < It/2) ENTONCES
IMPRIMIR “compre el automóvil”
FIN SI
FIN
15. Se desea obtener el promedio de g grupos que están en un mismo año
escolar; siendo que cada grupo puede tener n alumnos que cada alumno
puede llevar m materias y que en todas las materias se promedian tres
calificaciones para obtener el promedio de la materia. Lo que se desea
desplegar es el promedio de los grupos, el promedio de cada grupo y el
promedio de cada alumno. Diseñe el algoritmo.
INICIO
ESCRIBIR “digite el numero de estudiantes”
LEER nEstudiantes
ESCRIBIR “escriba numero de notas”
LEER numNotas
x<-0
promeT<-0
promeE<-0
nota<-0
MIENTRAS x<nEstudiantes HACER
nota<-0
promeE<-0
ESCRIBIR “digite el nombre del estudiante”
LEER nomEstudiante
ESCRIBIR “digite las notas”
PARA i<-1 HASTA numNotas CON PASO 1 HACER
LEER notas
nota<-nota+notas
FIN PARA
promeE<-nota/numNotas
ESCRIBIR “el promedio del estudiante es”
ESCRIBIR promeE
promeT<-promeT+promeE
SI promeE<3 ENTONCES
reprobados<-reprobados+1
SINO
aprobados<-aprobados+1
FIN SI
x<-x+1
FIN MIENTRAS
ESCRIBIR “el promedio del curso es igual a”
ESCRIBIR (promeT/nEstudiantes)
ESCRIBIR “el numero de estudiantes aprobados es”
ESCRIBIR aprobados
ESCRIBIR “el numero de estudiantes reprobados es”
ESCRIBIR reprobados
FIN
INICIO
DEFINIR an, días, añ
ESCRIBIR “ingrese su año de nacimiento”
LEER an
PARA i=an hasta añ
Si(i mod 4=0) ENTONCES
Días= (i-añ)*365+1
Suma días=suma días+días
SI NO
Días =(i- an) *365
FIN SI
HAGA i=i+1
FIN PARA
MUESTRE suma días
FIN
17. Realice un algoritmo que pida un número y me diga si ese número es par
o no; también me pregunte si deseo volver a introducir otro número.
INICIO
Escribir "Indique un número: "
Leer numero
Si numero % 2 = 0 Entonces
Escribir numero, " es par"
Si No
Escribir numero, " no es par"
Fin Si
Fin
18. Diseñe un algoritmo que almacene en un vector llamado FIB [100] los 100
primeros números de la serie Fibonacci.
INICIO
DEFINE a<-0, b<-1, c<-0
Limite<-10
Dimensión de vector[limite]
Para k<-1 hasta limite hacer
C<-a+b
A<-b
B<-c
Vector[k]<-c
ESCRIBIR vector[k]
FIN PARA
FIN
INICIO
DEFINA m [f, c], f, c, nota, cn, ca, cs
PARA f=1 hasta 50
PARA c=1 hasta 5
LEER nota
HAGA m[f, c] = nota
HAGA c= c +1
HAGA f = f +1
FIN PARA
FIN PARA
PARA f=1 hasta 50
PARA c=1 hasta 5
SI M[f,c]= 5 ENTONCES
cs= cs+1
SI NO
SI m[f,c]= 2.a ENTONCES
Cn=ca+1
FIN SI
FIN SI
HAGA c= c +1
HAGA f = f +1
FIN PARA
FIN PARA
20. Diseñe un algoritmo que use una matriz llamado "matriz" de 10 columnas
por 10 renglones el cual tendrá lo siguiente:
La diagonal principal tendrá números 0
Debajo de la diagonal principal tendrá números 1
Arriba de la diagonal principal tendrá números 2
La matriz tendrá este aspecto:
INICIO
DEFINA M[F, C]
PARA F=1 hasta 10
PARA C=1 hasta 10
SI (f=c) ENTONCES
HAGA M[ F,C]= ø
SI NO
SI (f>c) Entonces
HAGA M[F,C]=1
SI NO
HAGA M[F,C] =2
FIN SI
FIN SI
HAGA C = C+1
HAGA F=F+1
FIN PARA
FIN PARA
FIN