taulukko.m

% Skripti, joka laskee taulukon (vektorin) alkioiden parillisten ja
% parittomien lukujen keskiarvot.

% Taulukko josta lasketaan
x = [1 2 3 0 5 6 8];

% Tarvitaan parillisten ja parittomien lukujen lukumäärät sekä
% parillisten ja parittomien lukujen summat
N_parill = 0;
N_paritt = 0;
sum_parill = 0;
sum_paritt = 0;

% Käydään läpi vektorin alkiot
for k = 1:length(x)

    if mod(x(k),2) == 0
        % Jos alkio on parillinen
        N_parill = N_parill + 1;
        sum_parill = sum_parill + x(k);
    else
        % Jos pariton
        N_paritt = N_paritt + 1;
        sum_paritt = sum_paritt + x(k);
    end
end

% Lasketaan keskiarvot ja tulostetaan ruudulle
KA_parill = sum_parill/N_parill
KA_paritt = sum_paritt/N_paritt