
Procedimiento numérico
Hallar la raíz real de la siguiente ecuación por el procedimiento del punto medio
public class Funcion extends Ecuacion{ double a; double n0; double b; final double k=0.46235; public Funcion(double r0, double n0) { this.b=16*Math.PI*k*r0*r0/(3*n0); this.n0=n0; } void setMoles(double n){ this.a=n/n0; } public double f(double x){ double y=x*x*x*x*x*x*x+b*x*x*x*x*x*x-a*x*x*x*x-b; return y; } } public class MiCanvas extends Canvas { final double r0=42.06; //radio inicial final double n0=12.5; // número inicial de moles double r=r0; double xEmbolo=1.0; Funcion f=new Funcion(r0/100, n0); int nVeces; double nMoles; //.... void mover(){ xEmbolo+=0.01; nMoles=n0+nVeces*5+xEmbolo*5; f.setMoles(nMoles); r=r0*f.puntoMedio(1.0, 5.0); //radio del globo } //... |
