viernes, 24 de agosto de 2012

detectar año bisiesto

Es Bash

if [ $[ $anyo % 4 ] -eq 0 ] ; then
  if [ $[ $anyo % 100 ] -ne 0 -o $[ $anyo % 400 ] -eq 0 ] ; then
  echo "Año Bisiesto"
fi
  else echo "Año No Bisiesto"
fi

En VB

If (Año / 4) = Int(Año / 4) And (Año / 100) <> Int(Año / 100) Or (Año / 400) = Int(Año / 400) Then
 Año Bisiesto
else
 Año No Bisiesto
end if

En MATLAB


x=input('x: ');
if rem(x,4)==0 && (rem(x,100)~=0 || rem(x,400)==0)
 disp('año bisiesto')
else
 disp('año no bisiesto')
end

En R


añobis <- function(x) { 
if (x%%4==0 && (x%%100 != 0  || x%%400 == 0))
 {'año bisiesto'}
else 
 {'año no bisiesto'}
}

En Javascript

bisiesto = (año%4==0) && ((año%100!= 0) || (año%400==0)); 

En Python


if (x%4==0 and not x%100==0) or x%400==0:
    return True
else:
    return False