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


//-----------------------------------------------------------------
//HISTOGRAM

G=[2250;2300;2350;2400;2450;2500]
//clf;
H=[dane(:,2)]

A=0;
B=0;
C=0;
D=0;
E=0;
F=0;


for i=1:10,
if (H(i)>2250 & H(i)<=2300) then,A=A+1;end,

if (H(i)>2300 & H(i)<=2350) then B=B+1; end,

if H(i)>2350 & H(i)<=2400 then C=C+1; end,

if H(i)>2400 & H(i)<=2450 then D=D+1; end,

if H(i)>2450 & H(i)<=2500 then E=E+1; end,

if H(i)>2500 & H(i)<=2550 then F=F+1; end,
H(i);


end