Intentando con Try ....

[marcoszorrilla]

 function EsBisiesto(Agnus: Integer): Boolean;
 begin
   Result :=
 	((Agnus mod 4) = 0) // es múltiplo de 4
 	and
 	(
 		  (Agnus mod 400 = 0) or// a menos que también de 400
 	  (Agnus mod 100 <> 0)  // pero no de 100
 	);
 end;

Poniéndolo en latín funciona, jeje.

[roman]

Empezado por marcoszorrilla

Poniéndolo en latín funciona, jeje.

O bien en PHP:

Código PHP:

function esBisiesto($año)
{
  return
    (fmod($año, 4) == 0) // es múltiplo de 4
    &&
    (
      (fmod($año, 100) != 0) // pero no de 100
      ||
      (fmod($año, 400) == 0) // a menos que también de 400
    );
} 


No conozco otro lenguaje que lo permita.

// Saludos