function [darabszam, atlag, maxErtek, maxHelyIndex] = zh1_feladat2_kolmi()
    load zh1_feladat2_archivum;
    % a.)
    nem_ervenyes = adatok<50 | adatok>100;
    adatok2 = adatok;
    adatok2(nem_ervenyes) = 0;
    
    % b.)
    adatok3 = squeeze(adatok2(1, :, 1:16));
    %size(adatok3)
    
    % c.)
    figure;
    hold on;
    plot(adatok3(1, :), 'r*-', 'LineWidth', 2, 'MarkerSize', 6);
    plot(adatok3(2, :), 'gs:', 'LineWidth', 2, 'MarkerSize', 6);
    plot(adatok3(3, :), 'b^-.', 'LineWidth', 2, 'MarkerSize', 6);
    plot([0 length(adatok3(1, :))], [50 50], 'k--');
    plot([0 length(adatok3(1, :))], [100 100], 'k--');
    legend('reggel', 'delben', 'este', 'hatar');
    xlabel('napok tengelye', 'FontSize', 12, 'FontWeight', 'bold');
    ylabel('meresi ertekek', 'FontSize', 12, 'FontWeight', 'bold');
    title('cim', 'FontSize', 14);
    xlim([1, 16]);
    ylim([-10, 120]);
    
    % d.)
    indexv2 = adatok3(1, :)>0;
    darabszam = sum(indexv2);
    atlag = sum(adatok3(1, :)) / darabszam;
    fprintf('Helyes reggeli adatok darabszama: %d, atlaga: %6.3f\n', ...
        darabszam, atlag);
    
    % e.)
    [maxErtek, maxHelyIndex] = max(adatok3(2, :));
    fprintf('Deli maximum ertek: %6.3f, hanyadik napon: %d\n', ...
        maxErtek, maxHelyIndex);
    
    
    
    
    
    

end
