miércoles, 4 de septiembre de 2013

Descuentos (Programa 5)

Proceso descuentos
 //Declarar variables
 Definir a,b,c,d,e,f,g,h,i,j,k,m como numero;
 //Entrada
 Escribir "Precio del primer articulo"
 Leer a;
 Escribir "Precio del segundo articulo"
 Leer b;
 Escribir "Precio del tercer articulo"
 Leer c;
 //Proceso
 d<-a+b+c
 Escribir "Su total es:" d;
 e<-d*16/100
 Escribir "El iva de su cuenta es:" e;
 f<-d+e
 Escribir "El total con el iva es:" f;
 Si d>500 && d <999 Entonces
  g<-d*5/100
  Escribir "Su descuento es de:" g;
  h<-d-g
  Escribir "El total con el descuento es:" h;
 FinSi
 Si d>1000 && d<1499 Entonces
  i<-d*7/100
  Escribir "su descuento es de:" i;
  k<-d-i
  Escribir "El total con el descuento es:" k;
 FinSi
 Si d>1500 Entonces
  j<-d*10/100
  Escribir "Su descuento es de:" j;
  m<-d-j
  Escribir "El total con el descuento es:" m;
 FinSi
 Si d<499 Entonces
  Escribir "Para usted no hay descuento"
 FinSi
 Escribir "José David Marín"
FinProceso





Programa PseInt "Calculando Escolaridad" (programa 3)

Proceso escolaridad
 //Entrada
 //Declaar variables
 Definir edad como numero;
 Escribir "dame tu edad"
 Leer edad;
 //Proceso
 Si edad <=1 Entonces
  Escribir "Error"
 FinSi
 Si edad>2 && edad<= 5 Entonces
  Escribir 'Preescolar'
 FinSi
 Si edad>=6 && edad<=11 Entonces
  Escribir 'Primaria'
 FinSi
 Si edad>=12 && edad<=14 Entonces
  Escribir 'Secundaria'
 FinSi
 Si edad>=15 && edad<=17 Entonces
  Escribir 'Preparatoria'
 FinSi
 Si edad>=18 && edad<=22 Entonces
  Escribir 'Licenciatura'
 FinSi
 Si edad>=23 && edad<=26 Entonces
  Escribir 'Posgrado'
 FinSi
 Si edad>=27 && edad<=99 Entonces
  Escribir 'YA NO ESTUDIE'
 FinSi
 Si edad >=100 Entonces
  Escribir "Error"
 FinSi
 Escribir "Jose David Marín"
FinProceso

Programa en pseint para calcular el area (Programa 2)

Proceso area
 //declarar variables
 Definir a,b,c,multiplica,divide como numero;
 //entrada
 Escribir "dame el valor de la base";
 Leer a;
 Escribir "dame el valor de la altura";
 Leer  b;
 //proceso
 c<-a*b/2;
 //salida
 Escribir "el area del triangulo es:", c;
 Escribir  "José David Marín"
FinProceso

martes, 3 de septiembre de 2013

Operaciones (Programa 1)

Proceso Operaciones
//declarar variables
Definir a,b,suma,resta,multiplica,divide como numero;
//Entrada
Escribir "Dame un número"
Leer a;
Escribir "Dame un número"
Leer b;
//proceso
suma<-a+b;
resta<-a-b
multiplica<-a*b;
divide<-a/b
//salida
Escribir "El resultado de la suma es:",suma;
Escribir "El resultado de la resta es:",resta;
Escribir "El resultado de la multiplicacion es:",multiplica
Escribir "El resultado de su division es:",divide
        Escribir "David Marín"
FinProceso