Advertisement
Guest User

Untitled

a guest
Apr 8th, 2018
55
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Scilab 0.63 KB | None | 0 0
  1. clear
  2. xdel(winsid())
  3.  
  4. //macierz wspolczynnikow
  5. A = [[1, 1, 1]; [0, -1, 2]; [3, -1, 1]]
  6.  
  7. //wektor wynikow
  8. b = [0; 1; 0]
  9.  
  10. //wektor niewiadomych
  11. x0 = rand(length(b), 1)
  12.  
  13. //macierz C
  14. C = %nan * ones(length(b), length(b))
  15.  
  16. //wektor f
  17. f = %nan * ones(length(b), 1)
  18.  
  19. //tworzenie nowych x
  20.  
  21.  
  22. //wypelnanie C i f
  23. for i = 1:length(b)
  24.     for j = 1:length(b)
  25.         if j == i then
  26.             C(i, j) = 0
  27.             f(i, 1) = b(i, 1)/A(i, i)
  28.         else
  29.             C(i, j) = A(i, j)/A(i, i)
  30.         end
  31.     end
  32. end
  33.  
  34.  
  35. for n = 1:100
  36.     printf('\nIteracja nr %g', n)
  37.     x = C * x0 + f
  38.     disp(x)
  39. end
  40. //iteracja x
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement