%rozdiel davka - skript, ktory obsahuje seriu prikazov ktore chceme opakovat (typicky vyzivanie osoby na zadanie nejakych udajov)
%                 (.m file)      
%        funkce - skript (.m file), ktory pracuje so vstupnymi a vystupnymi premennymi, zacina
%        hlavickou: function [vystupni parametry] = nazev funkce(vstupni parametry)
%         musi koncit prikazmo end   

%priklad davka
x = input('Zadejte cislo: ')
if x >= 0
    disp('Zadali ste nezaporne cislo')
else
    disp('Zadali ste zaporne cislo')
end

%priklad funkcie

%pouzitie funkcie nargin (funkcia pouzitelna len vo vnutri funkcie; zistuje pocet vstupnych argumentov funkcie)
function [y] = faktorial1 (n)

if ((nargin == 1) & (n >= 0) & (rem(n, 1) == 0))
	y = prod(1:n);
else 
	error('Nezadali jste nezaporne cele cislo!')
end

end


% vypis na display  + vypis chybovej hlasky

% vyuzitie funkcie disp

name = 'Alice';   
age = 12;
X = [name,' will be ',num2str(age),' this year.'];
disp(X)

% funkcia sprintf
sprintf('Her name is %s and her age is %d',name,vek)

% vypis chyboveho hlasenia
error('Her name is %s and her age is %d',name,vek)


%podmienka if/elseif/else 

%     if podmienka1
%        prikazy1
%     elseif podmienka2
%        prikazy2
%     else
%        prikazy3
%     end

x = 5;
if x >= 0
    disp('Zadali ste nezaporne cislo');
else
    disp('Zadali ste zaporne cislo');
end


%cyklus for (ak pozame kolkokrat chceme cyklus opakovat)

%  for prom=vyraz
%    prikazy
%  end

%sucin cisel od 1 do 5
j = 1
for i=1:5
    j = i * j
end

%cyklus while (ked nepozname dopredu pocet opakovani cyklu)

%    while podminka
%        prikazy
%    end

%vypisanie prvych 10 cisel
i = 0
while i<10
    i = i + 1;
    disp(i);
end