fid = file ('open','D:\Documents and Settings\ravano\Pulpit\scilabb\dane2.txt','unknown');
dane = read (fid, -1, 2);
//DYSTRYBUANTA-----------------------------------------------------------------
H=[dane(:,2)]

Min(1)=2250;

for i=1:7,

A(i)=0;
for j=1:100,

if (H(j)>Min(i) & H(j)<=Min(i)+50) then,A(i)=A(i)+1;end,

end,

if (i<7) then, Min(i+1)=Min(i)+50;end,


end

clf;

B=A*0.01;
C(1)=B(1);

for i=2:7,
C(i)=B(i)+C(i-1);
end

plot2d(Min,C, style=2);
xtitle(' Dystrybuanta dla 10 pomiarow');
a = get("current_axes");
a.grid = [1 1 -1];
title = a.title
title.font_size = 4;
xlabel = a.x_label;
xlabel.text = ' Prawdopodobieństwo ';
ylabel = a.y_label;
ylabel.text = 'Częśtość ';