Proceso bono_por_antiguedad
definir mbp Como Real
definir ca como entero
Escribir "ingrese la cantidad de años trabajadas"
leer ca
mbp=(ca*12000)-2000
Escribir "total del bono a pagar a un trabajador es de: " mbp
FinProceso
2)=========================================================
este algoritmos nos muestra las ganancias al mes y cada 5 meses por inversion
Proceso Banco
Definir mi,g1m,g5m,totalb como real;
Escribir "Algoritmo para ver cuanto se a ganado por invercion al banco.";
Escribir "______________________________________________________________";
Escribir "Ingrese el monto invertido.";
leer mi;
g1m=(mi*35)/100;
g5m=g1m*5;
totalb=mi+g5m;
Escribir "";
Escribir "_______________________________________________________________";
Escribir "Su ganancia por cada mes es de: ",g1m;
Escribir "";
Escribir "Su ganancia por los 5 meses es de: ",g5m;
Escribir "";
Escribir "Su capital total en el banco es de: ",totalb;
FinProceso
3)============================================================
Proceso calificacion_materia
Escribir "introdusca su primera nota parcial";
leer n1
Escribir "introdusca su segunda nota parcial";
leer n2
Escribir "introdusca su tercera nota parcial";
leer n3
Escribir "introdusa la nota del examen final";
leer exf
Escribir "introdusca la nota del trabajo final";
leer tf
promedio=(n1+n2+n3)/3;
c_parcial=promedio*.055;
c_exfinal=exf*0.30;
c_tfinal=ft*0.15;
c_total_final=c_parcial+c_exfinal+c_tfinal;
Escribir " su calificacon final de la materia es: " c_total_final;
FinProceso
4)==========================================================
Proceso comision_del_diezporciento_de_total_de_ventas
Escribir "por favor introdusca su sueldo base";
leer Sueldo_base;
Escribir "por favor introdusca su primera venta";
leer V1
Escribir "por favor introdusca su segunda venta";
leer V2
Escribir "por favor introdusca se tercera venta";
leer v3
Totalventas=v1+v2+v3;
Csion=Totalventas*0.10;
SueldoTmensual=Sueldo_base+Csion;
Escribir "su comision es: " Csion;
Escribir " su sueldo mensual más comisiones es de: " SueldoTmensual;
FinProceso
5)===========================================================
Proceso Compra_Blusa
//Necesito saber como sacar el descuento de una blusa que cuesta 500$ con un 10% de descuento
Escribir " por favor ingrese su compra";
leer Cpra;
descuento=Cpra*0.10;
Tc=Cpra-descuento;
Escribir " su monto total a pagar es de: " Tc;
FinProceso
6)============================================================
Proceso Edad_persona
Escribir "introdusca su fecha de naciemiento";
leer fn
Escribir "introdusca el año actual";
leer act
edad=fn-act;
Escribir " su edad es: " edad;
FinProceso
7)============================================================
Proceso calificacion
definir nom Como Caracter
definir cf como real
Escribir "cual es su nombre? "
leer nom
Escribir "introdusca su primera nota parcial"
leer n1
Escribir "introdusca su segunda nota parcial"
leer n2
Escribir "introdusca su tercera nota parcial"
leer n3
Escribir "introdusca su cuarta nota parcial"
leer n4
Escribir "introdusca su quinta nota parcial"
leer n5
eva1=n1*0.15
eva2=n2*0.30
eva3=n3*0.25
eva4=n4*0.10
eva5=n5*0.20
cf=eva1+eva2+eva3+eva4+eva5/5
Escribir nom " su calificacion final es de: " cf;
FinProceso
8)===========================================================
-
En un hospital existen tres áreas: Ginecología, Pediatría, Traumatologia. El presupuesto anual del hospital se reparte conforme a la sig. tabla:
Área Porcentaje del presupuesto
Ginecología 40%
Traumatologia 30%
Pediatría 30%
Obtener la cantidad de dinero que recibirá cada área, para cualquier monto presupuestal.
Proceso ginecologia_pediatria_traumatologiaEscribir "ingrese su presupuesto anual";
leer pa
Ginecologia=pa*0.40;
traumatologia=pa*0.30;
pediatria=pa*0.30;
Escribir "el area de ginecologia recibira un monto de: " ginecologia;
Escribir "el area de traumatologia recibira un monto de: " traumatologia;
Escribir "el area de pediatria recibira un monto de:" pediatria;
FinProceso
10)=========================================================
Proceso Interes_compuesto_de_un_depocito
Escribir "por favor ingrese el monto depocitado"
leer depocito
Escribir "por favor ingrese su tasa de interes anual "
leer tasa
Escribir "por favor ingrese la cantidad de años del monto depocitado"
leer cantidadaños
monto_depocitado=(depocito)*(tasa/100)
C_años=monto_depocitado*cantidadaños;
interes_compuesto=monto_depocitado+C_años;
Escribir "su interes compuesto es de: " interes_compuesto;
FinProceso
11)========================================================
//MOVILNET tiene un plan por Bs. 20.000 mensuales denominado PLAN ILIMITADO el cual
//consiste 1500 segundos libres para llamadas y 5 Bs. por cada mensaje de texto. Las llamadas
//adicionales tienen un costo de 600 Bs. por cada minuto. Suponiendo que una persona se excedió
//en las llamadas y se tiene como dato de entrada la cantidad total de mensajes y la cantidad total
//de segundos consumidos en el mes, realice un algoritmo que determine el monto total pagar a movilnet
//en el mes.
//tme= total mensajes enviados
//tsc=total segundos consumidos
//cm= cantidad de mensajes
//sc= segundos consumidos
//mtpmes= monto total a pagar al mes
Proceso Movilnet
definir mtpmes como real
definir llamadas_adicionales como real
definir cm como entero
definir tme como entero
definir tsc como real
Escribir "ingrese la cantidad de mensajes enviados";
leer cm;
Escribir "ingrese la cantidad total de segundos consumidos en el mes";
leer sc;
tme=cm*5;
tsc=sc/60
llamadas_adicionales=(600*tsc);
mtpmes=llamadas_adicionales+tme+20000;
Escribir "su monto total a pagar a movilnet en el mes es de: " mtpmes;
FinProceso
12)=========================================================
Proceso promedio_De_tres_materias
Escribir " introdusca su calificacion de el examen de matematica";
leer exm;
Escribir " introdusca su calificacion de la primera tarea";
leer t1;
Escribir " introdusca su calificacion de la segunda tarea";
leer t2;
Escribir " introdusca su calificacion de la tercera";
leer t3;
ptareas=(t1+t2+t3)/3;
Pgeneralm=(exm*0.90)+(ptareas*0.10);
Escribir " su promedio de matematica es de: " Pgeneralm;
Escribir "-----------------------------------------------------";
Escribir "";
Escribir " introdusca su calificacion de la examen de fisica";
leer exm;
Escribir " introdusca su calificacion de la primera tarea";
leer t1;
Escribir " introdusca su calificacion de la segunda tarea";
leer t2;
ptareas=(t1+t2)/2;
Pgeneralf=(exm*0.80)+(ptareas*0.20);
Escribir " su promedio de fisica es de: " Pgeneralf;
Escribir "---------------------------------------------------------";
Escribir "";
Escribir " introdusca su calificacion de el examen de quimica";
leer exm;
Escribir " introdusca su calificacion de la primera tarea";
leer t1;
Escribir " introdusca su calificacion de la segunda tarea";
leer t2;
Escribir " introdusca su calificacion de la tercera";
leer t3;
ptareas=(t1+t2+t3)/3;
Pgeneralq=(exm*0.85)+(ptareas*0.15);
P_tres_materias=(Pgeneralm+Pgeneralf+Pgeneralq)/3;
Escribir " su promedio de quimica es de: " Pgeneralq;
Escribir "el promedio general de las tres materias es de: " P_tres_materias;
FinProceso
13)=========================================================
Proceso precio_articulo_determinado
Escribir "ingrese el precio del articulo comprado";
leer pa
ganancia=pa*0.30;
precio_a_vender=ganancia+pa;
Escribir " el precio del articulo que desea vender sera de: " precio_a_vender, " su ganancia del 30% sera de: " ganancia;
FinProceso
14)=========================================================
Proceso promedio_cronometrado_semanal
definir prom,lu,mc,vn Como Real
Escribir "ingrese valores cronometrado del dia lunes";
Leer lu
Escribir "ingrse valores cronometrados del dia miercoles";
leer mc
Escribir "ingrese valores cronometrados del dia viernes";
Leer vn
prom=(lu+mc+mc)/3;
Escribir " su promedio cronometrado semanal es de: " prom;
FinProceso
15)===========================================================
Escribir "ingrese su salario "
leer S
aumento=(S*0.25);
Nuevo_sueldo=aumento+s;
Escribir "Su nuevo sueldo es: " Nuevo_sueldo;
FinProceso
16)===========================================================
Proceso sueldo_semanal_mensual_anual
Escribir "ingrese las horas trabajadas"
leer h
Escribir "ingrese la tarifa por hora"
leer tarifa
g_diaria=h*tarifa
g_semanal=g_diaria*6
g_mensual=g_diaria*30
g_anual=g_mensual*12
Escribir " mi ganancia diaria es de: " g_diaria;
Escribir " mi ganancia semanal es de: " g_semanal;
Escribir " mi ganancia mensual es de: " g_mensual;
Escribir " mi ganancia anual es de: " g_anual;
FinProceso
17)=============================================================
Proceso ganacia_mensual_por_consepto_de_una_Inversion
Escribir "introdusco el monto a invertir";
leer mi
gmensual= mi*0.02
Escribir "su ganancia mensual sera de: " gmensual;
FinProceso
18)===========================================================
Proceso tres_persona_inversion
Escribir "por favor ingrese la inversion del primer socio";
leer i1;
Escribir "por favor ingrese la inversion del segundo socio";
leer i2;
Escribir "por favor ingrese la inversion del tercer socio";
leer i3;
presupuesto=i1+i2+i3;
pi1=(i1*100)/presupuesto;
pi2=(i2*100)/presupuesto;
pi3=(i3*100)/presupuesto;
Escribir "el porcentaje del primer socio es: " pi1;
Escribir "el porcentaje del segundo socio es: " pi2;
Escribir "el porcentaje del tercer socio es: " pi3;
FinProceso
19)=========================================================
nota: investigar la unidad cambiaria del pais de interes
Proceso convercion_de_moneda_a_otra
Escribir "ingrese la cantidad en pesos";
leer c
Escribir "ingrese la unidad cambiaria"
leer uc
equivalencia=c*uc;
Escribir "su equivalencia en dolares es de: " equivalencia;
FinProceso
20)===========================================================
Proceso Interes_compuesto_de_un_depocito
Escribir "por favor ingrese el monto depocitado"
leer depocito
Escribir "por favor ingrese su tasa de interes anual "
leer tasa
Escribir "por favor ingrese la cantidad de años del monto depocitado"
leer cantidadaños
monto_depocitado=(depocito)*(tasa/100)
C_años=monto_depocitado*cantidadaños;
interes_compuesto=monto_depocitado+C_años;
Escribir "su interes compuesto es de: " interes_compuesto;
FinProceso
No hay comentarios:
Publicar un comentario