function Tablica(N); T=int(N*rand(1,N)) k = 2 // l = 1 // dlugosc podtablicy i = 1 // while k <= N do if T(k-1)==T(k) then k = k+1 i = i+1 if i > l then l = i end else i=1 k=k+1 end end disp(T) disp(l) endfunction