%% prog 0009 aņo bisiesto con if

clearvars;
close all;
clc;

anho = input ('aņo = ');
logi01 = rem(anho,4)   == 0;
logi02 = rem(anho,100) ~= 0;
logi03 = rem(anho,400) == 0;

if (logi01 && logi02) || logi03
    disp('aņo si es bisiesto');
else
    disp('aņo no es bisiesto');
end;