Algoritmos

Páginas: 4 (888 palabras) Publicado: 13 de noviembre de 2012
TRABAJO DE LOGICA

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...
Leer documento completo

Regístrate para leer el documento completo.

Estos documentos también te pueden resultar útiles

  • Algoritmo
  • Algoritmo
  • Algoritmos
  • Algoritmos
  • Algoritmos
  • Algoritmos
  • Algoritmos
  • Algoritmos

Conviértase en miembro formal de Buenas Tareas

INSCRÍBETE - ES GRATIS