Advertisement
Guest User

Untitled

a guest
May 11th, 2018
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Octave 1.15 KB | None | 0 0
  1. edit funkcja
  2.  
  3. function [wynik] = funkcja(x,y)
  4. wynik = x+y;
  5. end
  6. _____________________
  7. edit sortowanie
  8.  
  9. function [wynik] = sortowanie(x)
  10.   A=rand(1,x);
  11. for i = 1:x
  12.   for j = 1:(x-1)
  13.     if A(j) > A(j+1)
  14.       temp = A(j+1);
  15.       A(j+1) = A(j);
  16.       A(j) = temp;
  17.       j=j+1;
  18.     end
  19.   end
  20. end
  21. wynik = A;
  22. disp(wynik);
  23. _______________________
  24. function [wynik] = NWD(x,y)
  25.   if x&y>0
  26.     while(x!=y)
  27.     if(x<y)
  28.     y=y-x;
  29.   else
  30.     x=x-y;
  31.   end
  32. endwhile
  33. end
  34.     wynik=x;
  35.     disp(wynik);
  36. _______________________
  37. function [wynik] = pierwsza(x);
  38.   for i = 2:(x-1)
  39.     if (mod(x,i)==0)
  40.       disp('Nie jest to liczba pierwsza');
  41.       return;
  42.     endif
  43.   endfor
  44.   disp('Jest to liczba pierwsza.');
  45. end
  46. _______________________
  47. function [wynik] = dzielniki(x);
  48.   dzielniki=0;
  49.   for i = 2:x
  50.     if (mod(x,i)==0)
  51.       dzielniki = dzielniki+1;
  52.     endif
  53.   endfor
  54.   wynik = dzielniki;
  55. end
  56. _______________________
  57. function [wynik] = horner(x,y)
  58.   for i = 1:(x+1)
  59.     A(i)=input('Podaj wartosc wspolczynnika: ');
  60.   endfor
  61.   disp(A);
  62.   pom = A(1)
  63.   for j = 1:x
  64.     pom = (pom*y) + A(j);
  65.   endfor
  66. wynik = pom;
  67. disp(wynik);
  68. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement