| informa |
| clc clear all disp('program toto'); n=6 disp('podaj 6 liczb'); b=zeros(1,n); for j=1:n por=0; while [b(j)<1 | b(j)>49 | por==1] liw=input(strcat (num2str(j),'liczba:')); if size(liw)==[1 1] b(j)=liw; end por=0; for k=1:j-1 if (b(k)==b(j)) | (liw<1) | (liw>49) por=1; end; end; end; end; b=sort(b); disp(strcat('podales liczby:',num2str(b))); |