program EdadMayor;
 
uses
  crt;
 
var
  edadA, edadB, edadC, mayor: Integer;
 
begin
  ClrScr;
 
  // Leer las edades
  Write('Ingrese la edad A: ');
  ReadLn(edadA);
 
  Write('Ingrese la edad B: ');
  ReadLn(edadB);
 
  Write('Ingrese la edad C: ');
  ReadLn(edadC);
 
  // Comparaciones
  if edadA > edadB then
  begin
    if edadA > edadC then
      mayor := edadA
    else
      mayor := edadC;
  end
  else
  begin
    if edadB > edadC then
      mayor := edadB
    else
      mayor := edadC;
  end;
 
  // Mostrar resultado
  WriteLn('La edad mayor es: ', mayor);
 
  ReadLn; // Para que la ventana no se cierre automáticamente
end.
 

cHJvZ3JhbSBFZGFkTWF5b3I7Cgp1c2VzCiAgY3J0OwoKdmFyCiAgZWRhZEEsIGVkYWRCLCBlZGFkQywgbWF5b3I6IEludGVnZXI7CgpiZWdpbgogIENsclNjcjsKCiAgLy8gTGVlciBsYXMgZWRhZGVzCiAgV3JpdGUoJ0luZ3Jlc2UgbGEgZWRhZCBBOiAnKTsKICBSZWFkTG4oZWRhZEEpOwoKICBXcml0ZSgnSW5ncmVzZSBsYSBlZGFkIEI6ICcpOwogIFJlYWRMbihlZGFkQik7CgogIFdyaXRlKCdJbmdyZXNlIGxhIGVkYWQgQzogJyk7CiAgUmVhZExuKGVkYWRDKTsKCiAgLy8gQ29tcGFyYWNpb25lcwogIGlmIGVkYWRBID4gZWRhZEIgdGhlbgogIGJlZ2luCiAgICBpZiBlZGFkQSA+IGVkYWRDIHRoZW4KICAgICAgbWF5b3IgOj0gZWRhZEEKICAgIGVsc2UKICAgICAgbWF5b3IgOj0gZWRhZEM7CiAgZW5kCiAgZWxzZQogIGJlZ2luCiAgICBpZiBlZGFkQiA+IGVkYWRDIHRoZW4KICAgICAgbWF5b3IgOj0gZWRhZEIKICAgIGVsc2UKICAgICAgbWF5b3IgOj0gZWRhZEM7CiAgZW5kOwoKICAvLyBNb3N0cmFyIHJlc3VsdGFkbwogIFdyaXRlTG4oJ0xhIGVkYWQgbWF5b3IgZXM6ICcsIG1heW9yKTsKCiAgUmVhZExuOyAvLyBQYXJhIHF1ZSBsYSB2ZW50YW5hIG5vIHNlIGNpZXJyZSBhdXRvbcOhdGljYW1lbnRlCmVuZC4K