Programas en pascal

28/06/10
Programas

Sol cristina prieto Díaz

inicio
REALIZAR LA SUMA DE DOS NUMEROS
Leer (a), (b)
Inicio
Escribir numero 1
Leer (a)
Suma= a+b
Escribir numero 2
Leer (b)
mult
Suma= a+b
Imprimir suma
fin
Fin

REALIZAR UN PSEUDOCODIGO Y PROGRAMA QUE LEA LA EDAD DE UNA PERSONA Y QUE IMPRIMA LA EDAD QUE VA A TENER DENTRO DE 10 AÑOS
inicio
Inicio
Escribir (qué edad tieneahorita)
Leer edad, 10
Leer (edad)
Suma=edad+10
Imprimir (suma)
Fin
Suma
Suma= edad+10
Fin

inicio
REALIZAR UN PSEUDOCODIGO Y PROGRAMA QUE CALCULE EN AREA DE UN TRIANGULO QUE LO IMPRIMA.
Inicio
Leer a,b
Escribir el numero 1
Leer (b)
Mult=b+a
División=mult
Escribir el numero 2
Leer (a)
mult
Mult= b+a
Imprimir mult
Fin
Divicion= mult
Imprimir división
Fin

REALIZAR UNPSEUDOCODIGO Y PROGRAMA QUE PIDA EL NUMERO DE HORAS DE UN EMPLEADO Y EL SUELDO POR HORA E IMPRIMA EL SUELDO DEL EMPLEADO.
inicio

Inicio
Leer a,b
Escribir (numero de horas)
Leer (a)
Escribir (sueldo por hora)
Mult= a*b
Leer (b)
Mult= a*b
mult
Imprimir mult
Fin
fin

ELABORAR UN PSEUDOCODIGO Y PROGRAMA QUE PIDA TRES ARTICULOS, CALCULE LA SUMA Y LE APLIQUE UN 15% DE DESCUENTO E IMPRIMATOTAL A PAGAR.
Inicio
Inicio
Escribir (primer articulo)
Leer(a)
Leer a,b,c b,c
Escribir (segundo articulo)
Leer (b)
Escribir (tercer articulo)
Leer (c)
Suma= a+b+c
Mult=suma-mult
Resta=sum-mult
Suma= a+b+c
Mult=suma*.15
Resta=sum-mult
Imprimir resta
Fin
Resta

Fin

Inicio
REALIZAR UN PSEUDOCODIGO Y PROGRAMA QUE CALCULE LA EDAD DE UNA PERSONA SOLICITANDO EL AÑO DELNACIMIENTO.
Inicio
Leer nac, actual
Escribir (introduzca año de nac)
Leer (nac)
Escribir (fecha actual)
Resta= actual-nac
Leer (actual)
Resta= actual- nac
Imprimir resta
Resta
Fin

Fin

SUPONGA QUE UN INDIVIDUO DECEA INVERTIR SU CAPITAL EN UN BANCO Y DESEA SABER CUANTO DINERO GANARA DESPUES DE UN AÑO, SI EL BANCO PAGA A RAZON DE 2% MENSUAL.
Inicio

Inicio
Escribir (el capital)
Leercapital, gon, año
Leer (capital)
Gan= monto+0.02
Año= gon*12
Gan=monto+0.02
Año=gon*12
Imprimir año
Fin
Fin

Año

ELABORAR UN PSEUDOCÓDIGO QUE PIDA DOS NÚMEROS E IMPRIMA EL MAYOR DE ELLOS.
Inicio

Inicio
N1 N2
Escribir (‘numero 1’)
Leer (n1)
N1> N2
Escribir (‘numero 2’)
Mayor N2
Leer (n2)
Si (n1>n2) entonces
Mayor N1

Imprimir (‘mayor es’ n1)
Fin
Fin_ si
FinLEER DOS NÚMEROS Y SI EL NÚMERO 1 ES MAYOR QUE EL NÚMERO 2 QUE LO SUME SI NO QUE LO RESTE E IMPRIMA EL RESULTADO
Inicio

Inicio
N1, N2
Escribir (‘numero 1’)
Leer (n1)
Escribir (‘numero 2’)
N1> N2
Leer (n2)
Si (n1>n2) entonces
Mayor n2
Suma= n1+n2
Imprimir (suma)
Fin
Si_ no
Restar= n1-n2
Imprimir (resta)
Fin _ si
Fin


Inicio
REALIZAR UN PSEUDOCODIGO YPROGRAMA QUE LEA DOS NUMEROS Y SI EL NUMERO 1 ES MAYOR QUE EL NUMERO 2 QUE LOS SUME SI NO QUE LOS RESTE.
Inicio
Leer num1, num2, suma, resta
Escribir (num 1)
Leer (num 1)
Escribir (num 2)
Leer (num 2)
Suma=n1+n2
Resta=n1+n2
Si (num1>num2) entonces
Suma= n1+n2
Imprimir (suma)
Resta
Si_no
Resta=n1-n2
Fin
Imprimir (resta)
Fin_si

LEER EL PROMEDIO DE UNA PERSONA SI EL VALOR ES MAYOR QUE7 IMPRIMIR APROBADO SI NO IMPRIMIR REPROBADO.
Inicio
Inicio
Escribir (‘promedio’)
Promedio, aprobado, reprobado
Leer (p)
Si (p>7) entonces
Imprimir (aprobado)
P> 27
Si _ no
Imprimir (reprobado)
Imprimir
Fin_ si
Fin
Fin




LEER TRES ARTÍCULOS OBTENER LA SUMA SI ESTE ES MAYOR QUE 100 PESOS REALIZAR UN 10% DE DESCUENTO.
Inicio

Inicio
Escribir (‘ingrese precio art 1’)Sumar= precio, sueldo y tiempo
Leer (A1)
Escribir (‘ingrese precio art 2’)
Leer (A2)
Realizar 10% de descuento
Suma>=100
> 100
Escribir (‘ingrese precio art 3’)
Leer (A3)
Sumar A1+ A2+ A3
Fin
Realizar 10% de descuento
Si (suma>=100) entonces
Mult= suma * 0.10
Restar= suma- Mult
Imprimir (restar)
Si _ no
Imprimir (suma)
Fin _ si
Fin


ELABORAR UN PSEUDOCÓDIGO...