function Program_3

data=[];
%tablica z liczb dni od pocz±tku roku (nieprzestepnego) dla kolejnych miesiecy
ile_dni=[0,31,59,90,120,151,181,212,243,273,304,334];
%tablica z nazwami dni tygodnia
dni_tygodnia=['Poniedziałek', 'Wtorek', 'Środa', 'Czwartek', 'Piątek', 'Sobota', 'Niedziela'];

%pobieranie daty od urzytkownika
data_urodzenia=(input('Podaj swoja date w formacie dd-m-rrrr: ','s'));
n=length(data_urodzenia);

j=1;
for i=1:n
    if(data_urodzenia(i)=='-' | i==n)
        if(i~=n)
        %data_urodzenia(j:i-1)
        data=[data str2num(data_urodzenia(j:i-1))];
        else
        %data_urodzenia(j:i)
        data=[data str2num(data_urodzenia(j:i))];
        end
        j=i+1;
    end
    i=i+1;
end

dzien = data(1);
miesiac = data(2);
rok = data(3);

dzien_roku=(ile_dni(miesiac)+dzien);
%sprawdzanie czy rok jest przestępny
if(((mod(rok,4)==0 & mod(rok,100)~=0)|mod(rok,400)==0) & miesiac>2)
    dzien_roku=dzien_roku+1;
end

%wyznaczanie dnia tygodnia
YY=mod((rok-1),100);
C=(rok-1)-YY;
G=YY+floor(YY/4);
dzien_tyg=mod(((mod((floor(C/100)),4)*5)+G),7);
dzien_tyg=mod((dzien_tyg+dzien_roku-1),7);


%wyswietlanie wyniku
disp(' To jest: ')
if(dzien_tyg ==0)
    dni_tygodnia(1,:)
elseif(dzien_tyg==1)
    disp('Wtorek')
elseif(dzien_tyg==2)
    dni_tygodnia(3,:)
elseif(dzien_tyg==3)
    disp('Czwartek')
elseif(dzien_tyg==4)
    disp('Piątek')
elseif(dzien_tyg==5)
    disp('Sobota')
elseif(dzien_tyg==6)
    disp('Niedziela')
end