Yanisbeth Rodríguez.
1. Una librería almacena en un archivo secuencial la siguiente información sobre cada uno de los libros: Código, Titulo, Autor y Precio.
El archivo esta ordenado ascendentemente por los códigos del libros- de tipo cadenas- - Que no pueden repetirse. Hacer el siguiente algoritmo.
El algoritmo debe insertar nuevos registros en el archivo, que deben mantenerse ordenados en todo momento. Buscar los registros por campo código.
Inicio
Escribir Menú
Escribir primera opción
Escribir consulta
Escribir búsqueda
Escribir Elija la Opción
Leer: OP
Segun sea OP "Hacer"
Llamar a insertar
Llamar a consultar
Fin_Segun
Hasta que OP sea igual a 3
Procedimiento
Var
Lógicas, númericas, caracteres
Inicio
Repetir
Abrir el libro 1 y buscar OP
Leer: OP
Si el OP coincide con el libro
OP aceptado
Si_no OP falso
Mientras OP sea falso
Escribir datos del libro
Si_No Buscar los datos
Escribir "Si OP Pertenerce al campo de registro"
Si_Nno
OP= OP
OP Aceptado
2. Se dispone de un cierto número de valores de los cuales el ultimo es 999 y se desea determinar el valor maximo de las medias correspondientes a parejas de valor sucesivas.
Algoritmo: Media_Parejas
Var.
Entero: n1; n2
Real: Min; Max
Inicio
Leer: (n1; n2)
Max <---- (n1+n2)/2
Mientras (n2<>999) o (n1<>999) Hacer
Leer: (n1+n2)/2
Si Min > Max entonces
Max <---- M
Fin_Si
Fin_Mientras
Mostrar: R
Fin
Sonia Carmona.
1. Dada las horas trabajadas de una persona la tarifa de pago. Calcular su salario e imprimirlo.
Entero: Hora;Valor;Salario
Inicio
Leer: Hora; Valor
Salario <---- Hora*Valor
Escribir Salario
Fin
2. A un trabajador le pagan segun sus horas trabajadas y la tarifa esta a un valor por hora. Si la cantidad de horas trabajadas es mayor a 40 horas, la tarifa por hora se incrementa en un 5 % para las hora trabajadas y la tarifa.
Enteros: Horas- Trabajadas; Tarifa; Hora-extras; Salario; Tarifa-extras.
Inicio
Leer: Horas-Trabajadas; tarifas
Si horas-trabajadas <--- 40 entonces
Salario <---- horas- trabajadas* tarifas
Si_no
Tarifa-extra <---- tarifa+0.50*tarifa
Horas-extras <----- horas-trabajadas -40
Salario <--- horas-extras*tarifa-extra+40*tarifa
Fin_ Sin
Imprimir: Salario
Fin.
Alexander Páez
Realizar la suma de todos los números pares entre 2 y 100
Inicio
leer: Suma;Numero
Proceso
2+2=4
si el numero es > que 2 y < 100
S=suma+Numero
si es no volver el inicio, pero si no
FIN
Diseña un algoritmo que lea 3 números a,b,c y visualizar en la pantalla el valor mas grande. Se supone que los 3 valores son diferentes.
Inicio
leer:calcular cual de los 3 números es mayor
a;b;c
a=0; b=0 ; c=0
Proceso
si A>B entonces;
si A>C entonces;
A ''es mayor''
si B>C
si B>A
B ''es mayor''
si C>A
si C>B
C ''es mayor''
FIN Si
FIN Si
FIN Si
FIN
Jesy María Sookdeo
Algoritmo:
1.- Leer dos números y decir si están en orden creciente
Algoritmo_Comparación
Var
Real: a;b
Inicio
Escribir: "dar dos números"
Si a<--- b entonces
Escribir "orden creciente"
Si_No
Escribir "orden decreciente"
Fin_si
Fin
2.- Leída una fecha decir el día de la semana, suponiendo que el primer día de dicho mes fue lunes
Inicio
Constante: Lunes <---1
Martes <---2
Miércoles <---3
Jueves <---4
Viernes <---5
Sábado <---6
Domingo <---7
Var
Fecha: mes;día; año
Proceso
Decir el día de la semana
Mostrar: "fecha"
Fin
Ricardo Sifontes
1° Buscar y escribir la primera vocal leída del teclado (se supone que se leen, uno a uno, carácter del teclado)
Algoritmo Buscar_Vocal
Var
Carácter: P
Inicio
Repetir
Leer: (P)
Hasta que: P='a' o P='e' o P='i' o P='o' o P='u'
Escribir ('Primero', P)
Fin
2° Escribir un algoritmo que permita escribir en una pantalla la frase '¿Desea Continuar? S/N' hasta que la respuesta sea 'S' o 'N'
Algoritmo SN
Var
Caracter: Respuesta
Inicio
Repetir
Escribir('Desea Continuar S/N')
Leer: (Respuesta)
Hasta_que (Respuesta='S') o (Respuesta='N')
Fin
José moreno:
1) Se trata de calcular el salario neto de un trabajador:
inicio
calcula salario neto
leer ( nombre , hora, precio_hora)
salario_bruto <--- 020 salario_bruto
salario_neto <--- salario bruto_impuesto
escribir (nombre, salario_bruto, salario neto
fin
2) Determinar simultáneamente los valores máximo y mínimo de una lista de 100 alumnos.
algo max_mini
var
entero
real: max ; mini ; numero
inicio
leer ( numero)
max <--- numero
min <--- numero
desde <--- 2hasta 100 hacer
leer (numero)
si numero > max entonces;
max <--- numero
si_no
si numero < mini entonces;
fin si
fin si
fin desde
escribir (máximo, max, mínimo,min)
fin
José Ruiz
1. La estructura selectiva para saber si un año es o no bisiesto
inicio
Leer: año bisiesto
si " año es bisiesto entonces "
" a cada cuatro año sale 1 un dia"
si_no calcular el año bisiesto
fin si
fin
Angel Guilarte
1. Se desea convertir la calificaciones alfabéticas a numéricas
inicio
leer: letra ¨[ a...f ]
según sea
a < 1
b < 2
c < 3
d < 4
e < 5
f < 6
fin según
mostrar R = la clasificación de las letras
fin
2. Ir al cine
inicio
ver la cartelera
elegir una película
comprar la entrada
comprar cotufas
entrar a la película
fin
1. Se desea convertir la calificaciones alfabéticas a numéricas
inicio
leer: letra ¨[ a...f ]
según sea
a < 1
b < 2
c < 3
d < 4
e < 5
f < 6
fin según
mostrar R = la clasificación de las letras
fin
2. Ir al cine
inicio
ver la cartelera
elegir una película
comprar la entrada
comprar cotufas
entrar a la película
fin
