• Sábado 20 de Abril de 2024, 10:32

Autor Tema:  Problema sencillo de pascal  (Leído 1381 veces)

mellamo.agustin

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
Problema sencillo de pascal
« en: Domingo 11 de Abril de 2010, 07:02 »
0
Hola!
Necesito resolver el siguiente problema, diseñando un programa en pascal:-"Para procesar la informacion de pacientes de un hospital, se leen los siguientes datos: nombre del paciente, sexo (F o M), y edad. Se pide informar la edad promedio de los hombres y los nombres de las dos mujeres de mayor edad".
Mi unico problema al desarrollar este programa es que no se que algoritmo aplicar para calcular las dos mayores edades, si fuera el nombre de la mujer de mayor edad, la de menor edad, la de mayor y menor edad, o las que tienen la misma edad, no tendria problema, pero el caso es que tengo que determinar mujer es la que tiene mas años de edad y la segunda que le siga, es decir que hay que tener en cuenta que se puede suceder que dos mujeres tengan 98 y 99 años de edad y que ambas tengan 99, como sea, tengo un hosting y con justo le dare espacio a cualquiera que me ayude a resolver este problema. Gracias.

DriverOp

  • Miembro MUY activo
  • ***
  • Mensajes: 201
    • Ver Perfil
Re: Problema sencillo de pascal
« Respuesta #1 en: Domingo 11 de Abril de 2010, 08:50 »
0
Veamos...
Código: Pascal
  1.  
  2. EdadMax1:=0;
  3. EdadMax2:=0;
  4. ...
  5. Edad:=CalcularEdad(Fecha_de_nacimiento);
  6. if Edad >= EdadMax1 then
  7. begin
  8.   EdadMax2:=EdadMax1;
  9.   EdadMax1:=Edad;
  10. end
  11. else
  12.   if Edad >= EdadMax2 then
  13.     begin
  14.         EdadMax2:=Edad;
  15.     end;
  16.  
  17.  
Eso debería hacer el truco...