Implementar Métodos Numéricos con Visual Basic
Haber si me podría ayudar con este ejercicio.
Me piden que implemente el método de la bisección en visual basic.
Al parecer la respuesta el codigo es este;
Function f(x)/ f=x^2 -2 / End Function / Function bisec() / Xo=-1 / X1= 1 / n= 10 / tol =0,0001 / Xn =- 10000 / k= 0 / a =Xo /b =X1 / Do / K = k+1 / If b-a < tol or K> n Then Exit Do / Xn =(b+a)/2 /If f(xn)= 0 Then Exit Do / If f(xn)* f(a) >0 Then a =Xn / If f(xn) *f(a)<0 Then b=Xn / Loop / bisec =Xn / End Function.
Bueno lo he puesto entre barras para separar una de otra, todo va en vertical. Me piden que lo implemente en Visual Basic, y al abrir nuevo proyecto, me da una serie de plantillas, aplicación de windows forms, biblioteca de clases... La cuestión es que no sé muy bien que plantilla es la que tengo que coger. Y después si con este código valdría.
Haber si me puede ayudar, pues tengo que implementar bastantes métodos, y supongo que más o menos serán todos igual a la hora de hacerlos.
Me piden que implemente el método de la bisección en visual basic.
Al parecer la respuesta el codigo es este;
Function f(x)/ f=x^2 -2 / End Function / Function bisec() / Xo=-1 / X1= 1 / n= 10 / tol =0,0001 / Xn =- 10000 / k= 0 / a =Xo /b =X1 / Do / K = k+1 / If b-a < tol or K> n Then Exit Do / Xn =(b+a)/2 /If f(xn)= 0 Then Exit Do / If f(xn)* f(a) >0 Then a =Xn / If f(xn) *f(a)<0 Then b=Xn / Loop / bisec =Xn / End Function.
Bueno lo he puesto entre barras para separar una de otra, todo va en vertical. Me piden que lo implemente en Visual Basic, y al abrir nuevo proyecto, me da una serie de plantillas, aplicación de windows forms, biblioteca de clases... La cuestión es que no sé muy bien que plantilla es la que tengo que coger. Y después si con este código valdría.
Haber si me puede ayudar, pues tengo que implementar bastantes métodos, y supongo que más o menos serán todos igual a la hora de hacerlos.
Respuesta de fcosapa
1