一元二次方程求根 fortranprogram mainwrite(*,*)"a="read(*,*)awrite(*,*)"b="read(*,*)bwrite(*,*)"c="read(*,*)creal::d,e,x1,x2d=b*b-4*a*ce=sqrt(d)x1=(-b+e)/2.0/ax2=(-b-e)/2.0/awrite(*,*)x1write(*,*)x2end这是小弟编的求根公式的程序,
来源:学生作业帮助网 编辑:作业帮 时间:2024/08/27 04:15:41
![一元二次方程求根 fortranprogram mainwrite(*,*)](/uploads/image/z/14144795-35-5.jpg?t=%E4%B8%80%E5%85%83%E4%BA%8C%E6%AC%A1%E6%96%B9%E7%A8%8B%E6%B1%82%E6%A0%B9+fortranprogram+mainwrite%28%2A%2C%2A%29%22a%3D%22read%28%2A%2C%2A%29awrite%28%2A%2C%2A%29%22b%3D%22read%28%2A%2C%2A%29bwrite%28%2A%2C%2A%29%22c%3D%22read%28%2A%2C%2A%29creal%3A%3Ad%2Ce%2Cx1%2Cx2d%3Db%2Ab-4%2Aa%2Ace%3Dsqrt%28d%29x1%3D%28-b%2Be%29%2F2.0%2Fax2%3D%28-b-e%29%2F2.0%2Fawrite%28%2A%2C%2A%29x1write%28%2A%2C%2A%29x2end%E8%BF%99%E6%98%AF%E5%B0%8F%E5%BC%9F%E7%BC%96%E7%9A%84%E6%B1%82%E6%A0%B9%E5%85%AC%E5%BC%8F%E7%9A%84%E7%A8%8B%E5%BA%8F%2C)
xN0_p9Of4$D@!$A%3ML2kW=ji W+A&Cҝy:y>%~ș(@61$K0Ht@ VlVBz
J0#I3R#TQ+UmXeV"N9~ȵl]σYd-)KAljhBl@ņ&6UJ,`o]< |)N8J?yϿtMZ^l[7:N vv:_\R:/do
DU̴#!z_&w&JLR{u}p'Cx+{kpǸLK/MM
一元二次方程求根 fortranprogram mainwrite(*,*)"a="read(*,*)awrite(*,*)"b="read(*,*)bwrite(*,*)"c="read(*,*)creal::d,e,x1,x2d=b*b-4*a*ce=sqrt(d)x1=(-b+e)/2.0/ax2=(-b-e)/2.0/awrite(*,*)x1write(*,*)x2end这是小弟编的求根公式的程序,
一元二次方程求根 fortran
program main
write(*,*)"a="
read(*,*)a
write(*,*)"b="
read(*,*)b
write(*,*)"c="
read(*,*)c
real::d,e,x1,x2
d=b*b-4*a*c
e=sqrt(d)
x1=(-b+e)/2.0/a
x2=(-b-e)/2.0/a
write(*,*)x1
write(*,*)x2
end
这是小弟编的求根公式的程序,不考虑虚根,能告诉一下错误在哪吗?老说有一个error~
一元二次方程求根 fortranprogram mainwrite(*,*)"a="read(*,*)awrite(*,*)"b="read(*,*)bwrite(*,*)"c="read(*,*)creal::d,e,x1,x2d=b*b-4*a*ce=sqrt(d)x1=(-b+e)/2.0/ax2=(-b-e)/2.0/awrite(*,*)x1write(*,*)x2end这是小弟编的求根公式的程序,
real::d,e,x1,x2 要放在所有可执行语句之前.
write(*,*)"a=" 引号要用单引号.
一元二次方程的求根公式
一元二次方程求根公式是什么
一元二次方程求根公式可有?
初中数学一元二次方程求根公式
求一元二次方程的求根公式是什么
一元二次方程的求根公式怎么读?
急求一元二次方程的求根公式!
求根公式一元二次方程可以用在一元一次方程上么 ..
怎么利用配方法推导到一元二次方程求根公式
一元二次方程的求根公式是怎样被证明的?
一元二次方程的求根公式是怎样的
一元二次方程的求根公式是怎么得到的
一元二次方程 的求根公式是如何得到的?
谁能讲一下一元二次方程求根公式的推导谢
一元二次方程ax^2+bx+c=0求根公式
求根公式法解一元二次方程是说课稿啊,华东师大版的
虚系数一元二次方程的求根公式是什么?
什么叫公式法解一元二次方程?求根公式是什么?