programa fortran interpolacion metodo lineal.docx

program interpolar_lineal

implicit none !declaracion de variables real:: x,x1,x2,y1,y2,y

!pedir en pantalla write(*,*)"el valor de x1 es" read(*,*) x1 write(*,*)"el valor de x2 es" read(*,*) x2 write(*,*)"el valor de y1 es" read(*,*) y1 write(*,*)"el valor de y2 es" read(*,*) y2 write(*,*)"el valor de x es" read(*,*) x

!realizando operaciones

y=y1+((x-x1)/(x2-x1)*(y2-y1))

!imprimir en pantalla

write(*,*)"el resultado de y",y

end program