@isabella
Eq_3_grau
updated
Fortran
·

program Eq_3_grau implicit none integer(4)::a,b,c,d real(8)::delta real(8)::x1,x2,x3 real(8)::x0 real(8)::F,MF,dF real(8)::i
Programa Eq de 2ºGrau
updated
Fortran
·

program Eq_2_grau implicit none integer(4)::a,b,c !coeficientes real(8)::delta !discriminante real(8)::x1,x2 !raizes !leitura dos coeficientes