function kolacovyGraf
doSouboru;
g=zeSouboru;
disp(g);
subplot(1,2,1)
pie(g,{'mleko','voda','pivo','vino','rum'})
subplot(1,2,2)
bar(g)
end
function doSouboru
x=round(rand(1,5)*10);
f=fopen('cisla.txt','w');
for n=1:length(x)
    fprintf(f,'%d\n',x(n));
end
fclose(f);
for n=1:length(x)
    fprintf('%d\n',x(n));
end
end
function y=zeSouboru
f=fopen('cisla.txt','r');
y=fscanf(f,'%d');
fclose(f);
end


