Advertisement
Guest User

Untitled

a guest
Apr 20th, 2018
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
MatLab 7.42 KB | None | 0 0
  1. n=input('Unesite broj redova: ');
  2. m=input('Unesite broj kolona: ');
  3. A=[];
  4. for i=n:-1:1
  5. for j=1:m
  6. if j==1
  7. A(i,j)=n-i+1;
  8. elseif i==n
  9.     A(i,j)=j;
  10. else
  11. A(i,j)=A(i,j-1)+A(i+1,j);
  12. end
  13. end
  14. end
  15. disp(A);
  16. -------------------------------------------------------
  17. n=input('Unesite broj redova: ');
  18. m=input('Unesite broj kolona: ');
  19. A=[];
  20. for i=1:n
  21. for j=m:-1:1
  22. if j==m
  23. A(i,j)=i;
  24. elseif i==1
  25.     A(i,j)=m-j+1;
  26. else
  27. A(i,j)=A(i,j+1)+A(i-1,j);
  28. end
  29. end
  30. end
  31. disp(A);
  32. --------------------------------------------------------
  33. n=input('Unesite broj redova: ');
  34. m=input('Unesite broj kolona: ');
  35. A=[];
  36. for i=1:n
  37. for j=1:m
  38. if j==1
  39. A(i,j)=i;
  40. elseif i==1
  41.     A(i,j)=j;
  42. else
  43. A(i,j)=A(i,j-1)+A(i-1,j);
  44. end
  45. end
  46. end
  47. disp(A);
  48. ----------------------------------------------------------
  49. n=input('Unesite broj redova: ');
  50. m=input('Unesite broj kolona: ');
  51. A=[];
  52. for i=n:-1:1
  53. for j=m:-1:1
  54. if j==m
  55. A(i,j)=n-i+1;
  56. elseif i==n
  57.     A(i,j)=m-j+1;
  58. else
  59. A(i,j)=A(i,j+1)+A(i+1,j);
  60. end
  61. end
  62. end
  63. disp(A);
  64. -------------------------------------------------------------------------------------------------
  65. duzina=input('Unesite vrednost duzine (izrazenu u ulaznoj jedinici): ');
  66. JedUlaz=menu('Izaberite ulaznu jedinicu', 'metre', 'yard', 'foot', 'inch');
  67. switch JedUlaz
  68. case 1
  69.    mDuzina=duzina;
  70.    case 2
  71.     mDuzina=duzina/1.0936;
  72. case 3
  73.     mDuzina=duzina/3.2808;
  74. case 4
  75.      mDuzina=duzina/39.3701;
  76. end
  77. JedIz=menu('Izaberite izlaznu jedinicu', 'metre', 'yard', 'foot', 'inch');
  78. switch JedIz
  79. case 1
  80.    Izl=mDuzina;
  81.    case 2
  82.     Izl=1.0936*mDuzina;
  83. case 3
  84.     Izl=3.2808*mDuzina;
  85. case 4
  86.      Izl=39.3701*mDuzina;
  87. end
  88. fprintf('%f ulaznih jedinica dužine iznosi - \n', duzina);
  89. fprintf('%f izlaznih jedinica dužine.\n', Izl);
  90. -------------------------------------------------------------------------------------------------
  91. i=1;
  92. S=i;
  93. while floor(S/100)~=6+rem(S,10)||floor(S/100)~=3+floor(rem(S,100)/10)
  94.     i=i+1;
  95.     S=S+i;
  96. end
  97. disp(i)
  98. disp(S)
  99. -------------------------------------------------------------------------------------------------
  100. function y = task4(ulazniarg)
  101. [n m] = size(ulazniarg);
  102. if n>1 && m>1
  103.     y='matrica';
  104. elseif n==1 && m==1
  105.     y ='skalar';
  106. else
  107.     y='niz';
  108. end
  109. end
  110. --------------------------------------------------------------------------------------------------
  111. function y = task5(x)
  112. if x < -1
  113.       y = 1;
  114. elseif x >=-1 && x <=2
  115.       y = x^2;
  116. else
  117.       y = 4;
  118. end
  119. ---------------------------------------------------------------------------------------------------
  120. function A= task6
  121. n=input('Unesite broj vrsta matrice: ');
  122. m=input('Unesite broj kolona matrice: ');
  123. A=[];
  124. if mod(n,2)~=1 || mod(m,2)~=1
  125.     fprintf('Dimenzije matrice nisu odgovarajuce,\n');
  126.     fprintf('broj vrsta i kolona mora biti neparan.\n');
  127. end
  128. cv=ceil(n/2);
  129. ck=ceil(m/2);
  130. A(cv,ck)=1;
  131. for i=cv-1:-1:1
  132.     A(i,ck)=A(i+1,ck)+1;
  133. end
  134. for i=cv+1:n
  135.     A(i,ck)=A(i-1,ck)+1;
  136. end
  137. for i=ck+1:m
  138.     A(cv,i)=A(cv,i-1)+1;
  139. end
  140. for i=ck-1:-1:1
  141.     A(cv,i)=A(cv,i+1)+1;
  142. end
  143. for i=cv-1:-1:1
  144.     for j=ck-1:-1:1
  145.         A(i,j)=A(i+1,j)+A(i,j+1);
  146.     end
  147. end
  148. for i=cv-1:-1:1
  149.     for j=ck+1:m
  150.         A(i,j)=A(i+1,j)+A(i,j-1);
  151.     end
  152. end
  153. for i=cv+1:n
  154.     for j=ck-1:-1:1
  155.         A(i,j)=A(i-1,j)+A(i,j+1);
  156.     end
  157. end
  158. for i=cv+1:n
  159.     for j=ck+1:m
  160.         A(i,j)=A(i-1,j)+A(i,j-1);
  161.     end
  162. end
  163. -----------------------------------------------------------------------------------------------------
  164. telo=menu('Izaberite geometrijsko telo', 'lopta', 'kocka', 'kvadar');
  165. switch telo
  166.     case 1
  167.         r=input('Unesite poluprecnik lopte: ');
  168.         P=4*r^2*pi;
  169.         V=4/3*r^3*pi;
  170.         fprintf('Povrsina lopte je %f, a zapremina %f\n', P, V);
  171.     case 2
  172.         a=input('Unesite stranicu kocke: ');
  173.         P=6*a^2;
  174.         V=a^3;
  175.         fprintf('Povrsina kocke je %f, a zapremina %f\n', P, V);
  176.     case 3
  177.         a=input('Unesite duzinu kvadra: ');
  178.         b=input('Unesite sirinu kvadra: ');
  179.         c=input('Unesite visinu kvadra: ');
  180.         P=2*(a*b+a*c+b*c);
  181.         V=a*b*c;
  182.         fprintf('Povrsina kvadra je %f, a zapremina %f\n', P, V);
  183. end
  184. ------------------------------------------------------------------------------------------------------
  185. function zbir=task8(A,B)
  186. zbir = 0;
  187. save ask.txt A -ascii;
  188. [n m]=size(A);
  189. [i j]=size(B);
  190. if m~=j
  191.     fprintf('Dimenzije matrica nisu pogodne za smestanje u fajl\n');
  192.     return;
  193. else
  194.     save ask.txt B -ascii -append;
  195.     load ask.txt;
  196.     for x=1:n+i
  197.         if ask(x,2)>0
  198.             zbir=zbir+ask(x,2);
  199.         end
  200.     end
  201. end
  202. end
  203. -----------------------------------------------------------------------------------------------------
  204. T=[58, 73, 73, 53, 50, 48, 56, 73, 73, 66, 69, 63, 74, 82, 84, 91, 93, 89, 91, 80, 59, 69, 56, 64, 63, 66, 64, 74, 63, 69];
  205. Tiznad75=T>75;
  206. BrojDanaIznad75=sum(Tiznad75)
  207. Tizmedju65i80=T>65&T<80;
  208. BrojDanaIzmedju65i80=sum(Tizmedju65i80)
  209. DaniTizmedju50i60=find(T>50 & T<60)
  210. ------------------------------------------------------------------------------------------------------
  211. b=input('Unesite broj radnih sati ');
  212. c=input('Unesite cenu radnog sata ');
  213. Zarada=b*c;
  214. if b>40
  215. Zarada=Zarada+(b-40)*0.5*c;
  216. end
  217. fprintf('Zarada radnika je %5.2f\n', Zarada);
  218. --------------------------------------------------------------------------------------------------------
  219. h=input('Unesite visinu na kojoj se nalazi plovak: ');
  220. if h > 33
  221. disp('Greška. Visina ne može biti veća od 33 m.\n');
  222. elseif h < 0
  223. disp('Greška. Visina ne može biti negativan broj.\n');
  224. elseif h <= 19
  225. V = 12.5^2*pi*h;
  226. fprintf('Zapremina vode je %7.3f kubnih metara.\n',V);
  227. else
  228. rh=12.5+10.5*(h-19)/14;
  229. V=12.5^2*pi*19+(12.5^2+12.5*rh+rh^2)* pi*(h-19)/3;
  230. fprintf('Zapremina vode je %7.3f kubnih metara.\n',V);
  231. end
  232. -------------------------------------------------------------------------------------------------------
  233. Eulazno=input('Unesite količinu energije koju treba konvertovati: ');
  234. EulaznaJedinica=menu ('Unesite trenutnu jedinicu energije: ', 'J', 'ft-lb', 'cal', 'eV');
  235. greska=0;
  236. switch EulaznaJedinica
  237. case 1
  238.         EJ=Eulazno;
  239. case 2
  240.         EJ=Eulazno/0.738;
  241. case 3
  242.         EJ=Eulazno/0.239;
  243. case 4
  244.         EJ=Eulazno/6.24e18;
  245. otherwise
  246.         greska=1;
  247. end
  248. EizlaznaJedinica=menu ('Unesite izlaznu jedinicu energije', 'J', 'ft-lb', 'cal', 'eV');
  249. switch EizlaznaJedinica
  250. case 1
  251.         Eizlazno=EJ;
  252. case 2
  253.     Eizlazno=EJ*0.738;
  254. case 3
  255.         Eizlazno=EJ*0.239;
  256. case 4
  257.         Eizlazno=EJ*6.24e18;
  258. otherwise
  259.     greska=1;
  260. end
  261. if greska
  262. disp('GRESKA, trenutna ili izlazna jedinica nisu pravilno unete.')
  263. else
  264. fprintf('E = %g\n',Eizlazno)
  265. end
  266. --------------------------------------------------------------------------------------------------------
  267. n=input('Unesite broj elemenata: ');
  268. s=0;
  269. for i=1:n
  270.     s=s+((-1)^i*i)/2^i;
  271. end
  272. fprintf('Suma elemenata niza je: %d\n', s);
  273. --------------------------------------------------------------------------------------------------------
  274. function y=task14(x,n)
  275. xr=x/180*pi;
  276. y=0;
  277. for k=0:n-1
  278.     y=y+((-1)^k*xr^(2*k+1))/factorial(2*k+1);
  279. end
  280. -------------------------------------------------------------------------------------------------------
  281. x=input('Unesite x: ' );
  282. n=1; an=1; S=an;
  283. while abs(an) >= 0.0001 && n <= 30
  284. an=x^n/factorial(n);
  285. S=S+an;
  286. n=n+1;
  287. end
  288. if n >= 30
  289. disp('Potrebno je više od 30 elemenata\n')
  290. else
  291. fprintf('exp(%f) = %f ',x,S)
  292. fprintf('\nBroj korišćenih elemenata je : %i\n',n)
  293. end
  294. -------------------------------------------------------------------------------------------------------
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement