function iskola(fajlnev)
    % adatbetoltes
    f = fopen(fajlnev, 'r');
    fgets(f);
    n = 0;
    while 1
        s = fgets(f);
        if s == -1; break; end
        n++;
        [t s] = strtok(s, ';');
        nev{n} = t;
        [t s] = strtok(s, ';');
        oszt(n, 1) = str2num(t);
        [t s] = strtok(s, ';');
        oszt(n, 2) = str2num(t);
        [t s] = strtok(s, ';');
        oszt(n, 3) = str2num(t);
        [t s] = strtok(s, ';');
        oszt(n, 4) = str2num(t);
    end
    fclose(f);

    % matek 5-osok fizika atlaga
    m = find(oszt(:, 2) == 5)
    fprintf("A matamatikabol 5-os tanulok atlaga fizikabol: %.3f\n", mean(oszt(m, 4)));

    % tanulmanyi atlag szerinti listazas
    x = mean(oszt, 2);
    [y z] = sort(x, 'descend');
    fprintf("Tanulmanyi atlag szerinti rangsor:\n");
    for j = 1 : n
	k = z(j);
	fprintf("%d.\t%s\t%.2f\n", j, nev{k}, x(k));
    end
end