Advertisement
Guest User

Untitled

a guest
Jan 26th, 2020
153
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
MatLab 0.58 KB | None | 0 0
  1. %carico vettore
  2. fprintf('inserisci la lunghezza del vettore');
  3. n=input('');
  4. for i=1:n
  5.     fprintf('inserisci posizione %d del vettore: ', i);
  6.     v(i)=input('');
  7. end
  8.  
  9. %verifico sequenze e inserisco nella matrice
  10. sequenza=0;
  11. for i=n:-1:2
  12.     resto=v(i);
  13.     b=0;
  14.     d=1;
  15.     while resto>0
  16.         b=b+1;
  17.         if i>b
  18.         resto=resto-v(i-b);
  19.         else
  20.         resto=-1;
  21.         end
  22.     end
  23.     if resto==0&&not(v(i)==0)
  24.         sequenza=sequenza+1;
  25.         for c=b:-1:0
  26.             a(sequenza, d)=v(i-c);
  27.             d=d+1;
  28.         end
  29.     end
  30. end
  31. disp(a);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement