PRACTICO#2
Docente: M.Sc. Ing. Angélica Garzón Cuéllar
NOMBRE: Sebastian Carreño Cuellar
-ELABORAR ALGORITMO Y PRUEBA DE ESCRITORIO
-ESTRUCTURA SECUENCIAL Y ESTRUCTURA DE CONTROL
1. Calcular el salario de un empleado si se sabe que para los de turno diurno la tarifa en el caso de horas
normales de trabajo es de 1.3 y en el caso de horas extras es de 2. l si el empleado es de turno diurno, la tarifa
será horas normales es de 1.8 y para horas extras es de 2.5.
Algoritmo Ejercicio1
Definir HrN,HrE,turno Como Entero;
Definir s Como Real;
Escribir "Ingrese horas normales trabajadas";
Leer HrN;
Escribir "Ingrese las horas extras trabajadas";
Leer HrE;
Escribir "Ingrese su turno, Diurno=1, Nocturno=2";
Leer turno;
si (turno=1)o(turno=2) Entonces
si turno=1 Entonces
s= (HrN*1.3)+(HrE*2.1);
SiNo
s=(HrN*1.8)+(HrE*2.5);
FinSi
Escribir "Su salario es: ",s;
SiNo
Escribir"Error";
FinSi
FinAlgoritmo
Prueba de escritorio
HrN HrE turno s Mostrar
8 4 1 18.8 Su salario es: 18.8
40 5 2 84.5 Su salario es: 84.5
24 6 1 43.8 Su salario es: 43.8
2. Leer 2 números por teclado y mostrar el número mayor, si son iguales debe mostrar un mensaje
Algoritmo Ejercicio2
Definir a,b Como Entero;
Escribir 'Ingrese un número';
Leer a;
Escribir 'Ingrese un número';
Leer b;
Si a=b Entonces
Escribir 'Son iguales';
SiNo
Si a>b Entonces
Escribir a,' Es mayor';
SiNo
Escribir b, ' Es mayor';
FinSi
FinSi
FinAlgoritmo
a b a=b a>b Mostrar
5 5 V F Son iguales
6 20 F F 20 Es mayor
50 10 F V 50 Es mayor
3. A un trabajador le pagan según sus horas y una tarifa de pago por horas. si la cantidad de horas trabajadas es mayor a
40 horas. la tarifa se incrementa en un 50% para las horas extras. calcular el salario del trabajador dadas las horas
trabajadas y la tarifa..
Algoritmo Ejercicio3
Definir hora,tarifa,extra Como Entero;
Definir salario Como Real;
Escribir 'Ingrese las cantidad de horas trabajadas';
Leer hora;
Escribir 'Ingrese la tarifa';
Leer tarifa;
Si hora > 40 Entonces extra= hora-40;
salario=(tarifa*40)+(extra*(tarifa+(tarifa*0.5)));
SiNo
salario=hora*tarifa;
FinSi
Escribir 'Su salario es: ',salario, ' Bs';
FinAlgoritmo
hora tarifa hora>40 extra salario Mostrar
36 10 F 0 360 Su salario es 360 BS
50 15 V 10 825 Su salario es 825 Bs
43 20 V 3 890 Su salario es 890 Bs
4. A un trabajador le descuentan de su sueldo el 10% si su sueldo es menor o igual a 1000. por encima de 1000 y
hasta 2000 el 5% del adicional, y por encima de 2000 el 3% del adicional. calcular el descuento y sueldo neto que
recibe el trabajador dado su sueldo.
Algoritmo Ejercicio4
Definir sueldo Como Entero;
Definir descuento,sueldoN Como ReaL;
Escribir 'Ingrese su sueldo';
Leer sueldo;
Si sueldo <= 1000 Entonces
descuento=sueldo*0.1;
SiNo
Si sueldo<=2000 Entonces
descuento=sueldo*0.05;
SiNo
descuento=sueldo*0.03;
FinSi
FinSi
sueldoN=sueldo-descuento;
Escribir 'El descuento es de ',descuento, ' Bs';
Escribir 'Su sueldo neto es ',sueldoN, ' Bs';
FinAlgoritmo
sueldo descuento sueldoN Mostrar
1000 100 900 El descuento es de 100 BS
Su sueldo neto es 900 BS
1800 90 1710 El descuento es de 90 BS
Su sueldo neto es 1710 BS
3500 105 3395 El descuento es de 105 BS
Su sueldo neto es 3395 BS
5. Dado un monto calcular el descuento considerando que por encima de 100 el descuento es el 10% y por debajo
de 100 el descuento es el 2%.
Algoritmo Ejercicio5
Definir a Como Entero;
Definir descuento Como Real;
Escribir 'Ingrese un valor';
Leer a;
Si a>100 Entonces
descuento= a * 0.1;
SiNo
descuento=a * 0.02;
FinSi
Escribir 'El descuento es: ',descuento;
FinAlgoritmo
a a>100 descuento Mostrar
90 F 1.8 El descuento es: 1.8
180 V 18 El descuento es: 18
250 V 25 El descuento es: 25
6. Leer un número por teclado y mostrar si dicho es par o impar
Algoritmo Ejercicio6
Definir a Como Real;
Escribir 'Ingrese un número';
Leer a;
Si a mod 2 = 0 Entonces
Escribir 'Es par';
SiNo
Escribir 'Es impar';
FinSi
FinAlgoritmo
a a mod 2 = 0 Mostrar
18 V Es par
55 F Es impar
468 V Es par
7. Calcular las raíces de la ecuación cuadrática AX2+BX +C = 0
Algoritmo Ejercicio7
definir a,b,c como Real;
definir discriminante como Real;
Escribir "Ingrese el coeficiente cuadrático";
Leer a;
Escribir "Ingrese el coeficiente Lineal";
Leer b;
Escribir "Ingrese el coeficiente independiente";
leer c;
discriminante = b*b-4*a*c;
Si discriminante < 0 Entonces
Escribir "Raíces imaginarias y diferentes";
Escribir "X1: " ,-b/(2*a) , "+" ,(Raiz(abs(discriminante)))/(2*a),"i";
Escribir "X2: " ,-b/(2*a) , "-" ,(Raiz(abs(discriminante)))/(2*a),"i";
SiNo
Si discriminante = 0 Entonces
Escribir "Raíces Reales e iguales o Raíz única";
Escribir "X1: ",-b/(2*a) + (raiz(discriminante))/(2*a);
Escribir "X2: ",-b/(2*a) - (raiz(discriminante))/(2*a);
SiNo
Escribir "Raíces Reales y Diferentes";
Escribir "X1: ",-b/(2*a) + (raiz(discriminante))/(2*a);
Escribir "X2: ",-b/(2*a) - (raiz(discriminante))/(2*a);
FinSi
FinSi
FinProceso
a b c discriminante Mostrar
Raíces Reales y Diferentes
1 -2 -15 64 X1: 5
X2: -3
Raíces imaginarias y diferentes
2 3 4 -23 X1: -0.75 + 1.1989578808i
X2: -0.75 - 1.1989578808i
Raíces Reales e iguales o Raíz única
3 6 3 0 X1: -1
X2: -1
8. Convertir una temperatura expresada en grados Celsius a grados Fahrenheit. La formula de
conversión es F = 9/5+32
Algoritmo Ejercicio8
Definir C,F Como Real;
Escribir 'Ingrese Grado Celsius';
Leer C;
F=(((C/5)*9)+32);
Escribir 'Grados Fahrenheit';
Escribir F;
FinAlgoritmo
C F Mostrar
25 77 Grados Fahrenheit
77
36 96.8 Grado Fahrenheit
96.8
10 50 Grado Fahrenheit
50
9. Determinar el área y el volumen de un cilindro cuyas dimensiones se leen por teclado
Algoritmo Ejercicio9
Definir radio,altura,area,volumen Como Real;
Escribir 'Ingrese el radio';
Leer radio;
Escribir 'Ingrese la altura';
Leer altura;
area= 2 * 3.1416 * radio * (altura+radio);
volumen= 3.1416*(radio*radio)*altura;
Escribir 'El área es: ',area;
Escribir 'El volumen es: ',volumen;
FinAlgoritmo
radio altura area volumen Mostrar
10 15 1570.8 4712.4 El área es: 1570.8
El volumen es: 4712.4
2 20 276.4608 251.328 El área es: 276.4608
El volumen es: 251.328
8 16 1206.3744 3216.9984 El área es: 1206.3744
El volumen es: 3216.9984
10. Determinar si un número es múltiplo de 6 y 9 a la vez
Algoritmo Ejercicio10
Definir a Como Entero;
Escribir 'Ingrese un número';
Leer a;
Si (a mod 6 =0)y(a mod 9=0) Entonces;
Escribir a, ' es múltiplo de 6 y 9 a la vez';
SiNo
Escribir "No es múltiplo de 6 y 9";
FinSi
FinAlgoritmo
a (a mod 6 =0)y(a mod 9=0) Mostrar
8 F No es múltiplo de 6 y 9
36 V 36 es múltiplo de 6 y 9 a la vez
54 V 54 es múltiplo de 6 y 9 a la vez
11.Determinar la cantidad de dinero que recibirá un trabajador por concepto de las horas
extras trabajadas en una empresa, sabiendo que cuando las horas de trabajo exceden de 40,
el resto se consideran horas extras y que éstas se pagan al doble de una hora normal cuando
no exceden de 8; si las horas extras exceden de 8 se pagan las primeras 8 al doble de lo que se
paga por una hora normal y el resto al triple.
Algoritmo Ejercicio11
Definir hora,tarifa,extra,extra2,extra3,pago,pago1,pago2 Como Entero;
Escribir 'Ingrese las cantidad de horas trabajadas';
Leer hora;
Escribir 'Ingrese la tarifa';
Leer tarifa;
extra=hora-40;
extra2=extra-8;
extra3=extra-extra2;
Si hora>40 Entonces;
Si extra<=8 Entonces
pago=extra*tarifa*2;
Escribir 'La cantidad total es de: ',pago;
SiNo
pago1=extra2*tarifa*3;
pago2=extra3*tarifa*2;
pago=pago1+pago2;
Escribir 'La cantidad total es de: ',pago;
FinSi
SiNo
Escribir ' No ha trabajado horas extras';
FinSi
FinAlgoritmo
hora tarifa extra hora>40 extra<=8 pago Mostrar
45 10 5 V V 100 La cantidad total es de: 100
36 15 -4 F / / No ha trabajado horas extras
65 20 25 V F 1340 La cantidad total es de: 1340
12.Dada la longitud de un triángulo mediante las variables a,b,c. Calcular su área mediante la
formula: Area = s(s-a)(s-b)(s-c) donde s = a + b + c
Algoritmo Ejercicio12
Definir area,A,B,C,S Como Real;
Escribir 'Ingrese el lado A';
Leer A;
Escribir 'Ingrese el lado B';
Leer B;
Escribir 'Ingrese el lado C';
Leer C;
S=(A+B+C)/2;
area=rc(S*(S-A)*(S-B)*(S-C));
Escribir 'El área del triángulo es: ',area;
FinAlgoritmo
A B C S area Mostrar
15 26 17 29 120.8966500777 El área del triángulo es: 120.8966500777
10 15 20 22.5 72.6184377414 El área del triángulo es: 72.6184377414
12 16 15 21.5 85.451375062 El área del triángulo es: 85.451375062
13. Hacer un algoritmo que muestre el valor absoluto de un numero introducido por teclado.
Algoritmo Ejercicio13
Definir a,valorAbs Como Entero;
Escribir 'Ingrese un numero';
Leer a;
Si a<0 Entonces
valorAbs=a*(-1);
Escribir 'Su valor absoluto es: ',valorAbs;
SiNo
Escribir 'Su valor absoluto es: ',a;
FinSi
FinAlgoritmo
14. Leer un día de la semana y mostrar el día que selecciono el usuario.
Algoritmo Ejercicio_1
Definir n Como Entero;
Escribir 'Ingrese un número del 1 al 7';
Leer n;
Segun n Hacer
1: Escribir 'Lunes';
2: Escribir 'Martes';
3: Escribir 'Miércoles';
4: Escribir 'Jueves';
5: Escribir 'Viernes';
6: Escribir 'Sábado';
7: Escribir 'Domingo';
De Otro Modo;
Escribir 'Error';
FinSegun
FinAlgoritmo
n Mostar
5 Viernes
2 Martes
15 Error
15. Imprimir el mes del año en caso de que su número corresponda al mes y decir cuantos días tiene
cada mes. Ejemplo 1 = Enero y tiene 31 día. Caso contrario. Si esta fuera del rango, es decir de 1 a 12
que imprima un mensaje de error.
Algoritmo Ejercicio_2
Definir a,b como entero;
Escribir 'Ingrese un número del 1 al 12';
leer a;
Segun a Hacer
1: Escribir a,' = Enero y tiene 31 días';
2: Escribir '¿Es año bisiesto? 1=si 2=no';
leer b;
Segun b hacer
1:Escribir a,' = Febrero y tiene 29 días';
2:Escribir a,' = Febrero y tiene 28 días';
FinSegun
3: Escribir a,' = Marzo y tiene 31 días';
4: Escribir a,' = Abril y tiene 30 días';
5: Escribir a,' = Mayo y tiene 31 días";
6: Escribir a,' = Junio y tiene 30 días';
7: Escribir a,' = Julio y tiene 31 días';
8: Escribir a,' = Agosto y tiene 31 días';
9: Escribir a,' = Septiembre y tiene 30 días';
10: Escribir a,' = Octubre y tiene 31 días';
11: Escribir a,' = Noviembre y tiene 30 días';
12: Escribir a,' = Diciembre y tiene 31 días';
De Otro Modo:
Escribir 'Error...Número no válido';
FinSegun
FinAlgoritmo
a b Mostrar
5 / 5 = Mayo y tiene 31 días
2 1 2 = Febrero y tiene 29 días
40 / Error…Número no válido
16. Mostrar los n primeros números naturales 1,2,3,4,5,6,7,8,………………….n
Algoritmo Ejercicio_3
Definir n,c Como Entero;
Escribir 'Ingrese un núumero';
Leer n;
c=1;
Mientras c<=n Hacer
Escribir c;
c=c+1;
FinMientras
FinAlgoritmo
n c C<=n Mostrar
5 1 V 1
2 V 2
3 V 3
4 V 4
5 V 5
6 F
17. Mostrar la suma de los primeros n números naturales. S=1+2+3+4+5+6+…………..n
Algoritmo Ejercicio_4
Definir c,s,n Como Entero;
Escribir'Ingrese un numero';
Leer n;
c=0;
s=0;
Mientras n>c Hacer
c=c+1;
s=s+c;
FinMientras
Escribir 'la suma es: ',s;
FinAlgoritmo
n c n>c s Mostrar
4 0 V 0
1 V 1 La suma es:
2 V 3 10
3 V 6
4 F 10
18. Mostrar el promedio de los primeros n números naturales. Prom = S/n
Algoritmo Ejercicio_5
Definir c,s,n Como Entero;
Definir p Como Real;
Escribir'Ingrese un numero';
Leer n;
c=0;
s=0;
Mientras n>c Hacer
c=c+1;
s=s+c;
FinMientras
p=s/n;
Escribir 'El promedio es: ',p;
FinAlgoritmo
n c s p n>c Mostrar
0 0 / V El promedio
5 1
2
3
4
1
3
6
10
/
/
/
/
V
V
V
V
es:3
5 15 15/3 F
19. Leer n notas por teclado y mostrar el promedio del curso
Algoritmo Ejercicio_6
Definir n,c,s,a Como Entero;
Definir P Como Real;
Escribir 'Ingrese la cantidad de notas';
Leer n;
c=0;
s=0;
Mientras c<n Hacer
Escribir 'Ingrese nota';
Leer a;
c=c+1;
s=s+a;
FinMientras
P=s/n;
Escribir 'El promedio del curso es: ',P;
FinAlgoritmo
n c a s p Mostrar
3 0 / 0 / 'El promedio del
1 80 80 / curso es: 70
2 60 140 /
3 70 210 210/3
20. Mostrar la suma de los primeros n números pares: SumaPar=2+4+6+8+………….n
Proceso Ejercicio_7
Definir n,c,s Como Entero;
Escribir 'Ingrese un número';
Leer n;
c <- 0;
s <- 0;
Mientras n>=c Hacer
Si c mod 2 =0 Entonces
s = s+c;
FinSi
c = c+1;
FinMientras
Escribir 'La suma es: ',s;
FinProceso
n c s c mod 2 = 0 Mostrar
0 0 V La suma es:
5 1 / F
2 2 V 6
3 / F
4 6 V
5 / F
21. Dado N notas de un estudiante calcular:
a) Cuantas notas tiene reprobados.
b) Cuantos aprobados.
c) El promedio de notas.
d) El promedio de notas aprobadas y reprobados.
Algoritmo Ejercicio_8
Definir c,n,ap,sumap,rp,sumrp,nota Como Entero;
Definir promedio,promedioap,promediorp Como Real;
Escribir 'Ingrese la cantidad de notas ';
leer n;
c=1;
ap=0;//aprobado
sumap=0;
rp=0;//reprobado
sumrp=0;
promedioap=0;
promediorp=0;
Mientras c<=n Hacer
Escribir 'Ingresar Nota ',c;
Leer nota;
si nota>=51 Entonces
ap=ap+1;
sumap=sumap+nota;
SiNo
rp=rp+1;
sumrp=sumrp+nota;
FinSi
promedio=(sumap+sumrp)/n;
c=c+1;
FinMientras
Si ap>0 Entonces
promedioap=sumap/ap;
FinSi
Si rp>0 Entonces
promediorp=sumrp/rp;
FinSi
Escribir 'Notas reprobadas: ',rp;
Escribir 'Notas aprobadas: ',ap;
Escribir 'Promedio de notas: ',promedio;
Escribir 'Promedio de notas aprobadas: ',promedioap;
Escribir 'Promedio de notas reprobadas: ',promediorp;
FinAlgoritmo
n c nota ap rp sumap sumrp promedioap promedi promedi Mostrar
orp o
5 1 60 0 0 60 0 0 0 0 'Notas reprobadas: 1
2 51 1 1 111 40 261/4 40/1 (261+40 'Notas aprobadas: 4
3 80 2 191 )/5 'Promedio de notas: 60.2
4 40 3 261 'Promedio de notas aprobadas:
5 70 4 65.25
6 'Promedio de notas reprobadas:
40
22. Hacer un programa que permita calcular la cuenta a pagar en un restaurant si el usuario escoge lo
que desea comer, y selecciona la cantidad donde hay 4 opciones (Sopa (5 Bs), entrada(2Bs), segundo(8
Bs), postre (3 Bs), refrescos(10 Bs)).
Proceso Ejercicio_9
Definir opciones,cuenta,opcion,cs,ce,csd,cp,cr,i,s,e,sd,p,r Como Entero;
Escribir 'Opciones de comidas a pedir '; //son 5 opciones: sopa,entrada,segundo,postre,refresco
Leer opciones;
cs <- 0; ce <- 0; csd <- 0; cp <- 0; cr <- 0; i <- 1;
Mientras i<=opciones Hacer
Escribir 'ocpcion '; // sopa=1 entrada=2 segundo=3 postre=4 refresco=5
Leer opcion;
Segun opcion Hacer
1:
Escribir 'Cantidad de Sopa';
Leer s;
cs <- s*5;
2:
Escribir 'Cantidad de Entrada';
Leer e;
ce <- e*2;
3:
Escribir 'Cantidad de Segundo';
Leer sd;
csd <- sd*8;
4:
Escribir 'Cantidad de Postre';
Leer p;
cp <- p*3;
5:
Escribir 'Cantidad de Refresco';
Leer r;
Cr=r*10;
FinSegun
i <- i+1;
FinMientras
cuenta <- cs+ce+csd+cp+cr;
Escribir 'Cuenta: ',cuenta,' Bs';
FinProceso
Opciones opcion s e sd p r cs ce csd cp cr cuenta Mostar
4 1 2 - - - - 10 - - - - Cuenta:
3 - - 4 - - - - 32 - - 74 Bs
4 - - - 4 - - - - 12 -
74
5 - - - - 2 - - - - 20
2 1 4 - - - - 20 - - - - Cuenta:
3 - - 4 - - - - 32 - -
52 52 Bs
23. Introducir n números y mostrar cuantos son pares e impares. Ejemplo si n= 5 (3,7,8,10,4) Pares =
3, Impares = 2
Proceso Ejercicio_10
Definir a,n,c,cp,ci Como Entero;
Escribir 'Ingrese la cantidad de números a leer';
Leer n;
c <- 0;
cp=0;
ci=0;
Mientras c<n Hacer
Escribir 'Ingrese un número';
Leer a;
Si a mod 2=0 Entonces
cp=cp+1;
SiNo
ci=ci+1;
FinSi
c=c+1;
FinMientras
Escribir 'Números pares: ',cp;
Escribir 'Números impares: ',ci;
FinProceso
n c a a mod 2 = 0 cp ci Mostrar
5 0 / / / / Números
1 15 F 0 1 pares: 3
2 20 V 1 1
3 6 V 2 1 Números
4 13 F 2 2 impares:2
5 8 V 3 2
