fortran求解方程一元二次方程的根,并输出.a,b,c的值由键盘输出.哪位大侠帮我看看这段程序哪个地方出错
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/13 14:15:21
fortran求解方程一元二次方程的根,并输出.a,b,c的值由键盘输出.哪位大侠帮我看看这段程序哪个地方出错
program example6_7
integer a,b,c
real d,d0
write(*,"('请输入系数A,B,C:'\)")
read*,a,b,c
d=b*b-4*a*c
if(a==0)then
if(b/=0)then
write(*,*) "方程只有一个解",-c/b
else if(c/=0)then
write(*,*) "方程无解"
else
write(*,*) "方程有无穷个解"
end if
else if(d
program example6_7
integer a,b,c
real d,d0
write(*,"('请输入系数A,B,C:'\)")
read*,a,b,c
d=b*b-4*a*c
if(a==0)then
if(b/=0)then
write(*,*) "方程只有一个解",-c/b
else if(c/=0)then
write(*,*) "方程无解"
else
write(*,*) "方程有无穷个解"
end if
else if(d
xi=sqrt(-d)/(2a)
改为
xi=sqrt(-d)/(2*a)
改为
xi=sqrt(-d)/(2*a)
fortran求解方程一元二次方程的根,并输出.a,b,c的值由键盘输出.哪位大侠帮我看看这段程序哪个地方出错
这个C语言程序(求一元二次方程的根)哪个地方出错了?
C语言 任意输入一元二次方程的系数a,b,c,计算并输出一元二次方程的所有根
C语言 编写程序 从键盘输入一元二次方程的三个参数(实数),计算并输出该方程的两个根
编写程序,任意输入一元二次方程ax的平方+bx+c=0中的abc的值,计算并求输出方程的根
输入一元二次方程ax2+bx+c=0系数a,b,c的值,计算并输出一元二次方程的两个根x1和x2.
帮我看看这个程序哪里出错了 怎么输出的是负数
编写c程序,计算并输出表达式S=(a-b)/sqrt(a+b)的值.其中a和c的值从键盘出入.
用c语言编写一个程序,从键盘上输入两个字符给字符变量a,b,并输出变量a,b的值.
用C++编程 求一元二次方程的解 并且要输出a,b,c的值?
C语言:请编写一个程序,从键盘读入两个整数a和n,计算并输出a+aa+aaa+...+aa...a(n个a)的值.
VB输入一元二次方程ax2+bx+c=0的系数a,b,c,计算并输出一元二次方程的两个根x1,x2.求代码及窗体设计