Algoritmos
DANNY DE JESUS ECHEVERRI LOPEZ
DOCENTE: EDDGAR VALENCIA
ABOGADOS EDUCANDO
22/08/2011
LA CEJA(ANT)
SOLUCION
1. DATOS DE ENTRADA
NOMBRE,LA EDAD,EL SEXO,ESTADOCIVIL
VAR: ED,SEX, EC
PROCESOS:
ESTABLECER SI LA PERSONA ES MAYOR DE 18 AÑOS Y CASADA
DATOS DE SALIDA
IMPRIMA LAS QUE CUMPLAN LA CONDICION
PROGRAM: PERSONA
BEGIN
VAR: NOM, SEX, EC:STRING;
ED: INTEGER;
WRITE (‘DIGITE EL NOMBRE’);
READ (NOM);
WRITE (‘DIGITE SEXO’);
READ (SEX);
WRITE (‘DIGITE ESTADO CIVIL’);
READ (EC);
WRITE (‘DIGITE EDAD’);
READ (ED);
IF(ED>=18) AND (EC=CASADA)THEN
WRITE (NOM,’TIENE’,ED,’AÑOS’,’ES UNA PERSONA’,EC,’Y SU SEXO ES’,SEX);
ELSE
WRITE (‘LA PERSONA NO CUMPLE LAS CONDICIONES’);
EDN;
END.
2. DATOS DE ENTRADAINGRESE CUATRO NOTAS DE UNA MATERIA, ASIGNATURA, NOMBRE DEL ESTUDIANTE
VAR: NOM,MAT,N1,N2,N3,N4
PROCESOS
MULTIPLICAR NOTAS Y DIVIDIR POR NÙMEROS DE NOTAS
DATOS DE SALIDA
IMPRIMA NOMBRE DELESTUDIANTE, LA ASIGNATURA, Y LA NOTA DEFINITIVA
PROGRAM: NOTA DEFINITIVA;
BEGIN
VAR: NOM,MAT: STRING;
N1,N2,N3,N4,DEF: REAL;
WRITE (‘DIGITE NOMBRE DEL ESTUDIANTE’);
READ (NOM);
WRITE(‘DIGITE MATERIA’);
READ (MAT);
WRITE (‘DIGITE NOTA 1’);
READ (N1);
WRITE (‘DIGITE NOTA2’);
READ (N2);
WRITE (‘DIGITE NOTA3’);
READ (N3);
WRITE (‘DIGITE NOTA4’);
READ (N4);
DEF:=(N1+N2+N3+N4)DIV4);
WRITE (‘EL ESTUDIANTE’,NOM,’EN’,MAT,’SACO’,DEF);
END.
3. DATOS DE ENTRADA
SALARIO BASICO
VAR: SB, HN, HDE,HDN
PROCESOS
HAYAR HORA NORMAL, HORA EXTRA DIURNA, HORAEXTRA NOCTURNA
HN= SB/30/8
HED= HN* 0.35
HEN= HN*0.70
DATOS DE SALIDA
IMPRIMA HN, HED, HEN
PROGRAM:SALARIO
BEGIN
VAR: SB,HN, HED, HEN: REAL;
WRITE (‘DIGITE SALARIO BASICO’);
READ(SB);
HN:=(SB/30/8);
HED:= (HN*0.35);
HEN:= (HN*0.70);
WRITE (‘LA HORA NORMAL’,HN);
WRITE (‘LA HORA EXTRA DIURNA ES’,HED);
WRITE (‘LA HORA EXTRA NOCTURNA ES’,HEN);
END.
4. DATOS DE ENTRADA...
Regístrate para leer el documento completo.