POWER METHOD
/* 1. Start 2. Get the values of a,x aerr, maxtir 3. Define Subroutine findmax 4. Call function findmax with e, x, n 5. Loop for itr = 1 to maxtir 6. Calculate r = a*x 7. Call function findmax with t, r, n 8. normalise r 9. maxe = 0; 10. Loop for i = 0 to N-1 11. err = fabs(x[i] - r[i]) 12. Is err>maxe, if yes maxe = err otherwise proceed 13. x[i] = r[i] 14. End Loop (i) 15. errv = fabs(t-e) 16. e = t 17. Print results of Iteration 18. Is errv < aerr && maxe < aerr, if Yes Print Solution and STOP otherwise proceed 19. End Loop (itr) 20. Print Solution does not converge 21. Stop Algorithm for findmax function 1. max = fabs(x(1)) 2. Loop for i = 1 to N-1 3. Is fabs (x[i] > max?, If yes proceed otherwise go to step 5 4. max = fabs(x[i]) 5. End loop (i) 6. Stop */ /* Power method for finding largest eigenvalue ...