pascal编程二元一次方程实数根求二元一次方程 ax*x+bx+c=0(a0)的实数根用PASCAL语言.
来源:学生作业帮助网 编辑:作业帮 时间:2024/10/01 03:49:41
x)+H,NNygOv]isՃlr{"0#%Ī(51MII+IMO-%gA@)`5ŅEI&ZZP4~qAb( $
pascal编程二元一次方程实数根求二元一次方程 ax*x+bx+c=0(a0)的实数根用PASCAL语言.
pascal编程二元一次方程实数根
求二元一次方程 ax*x+bx+c=0(a0)的实数根
用PASCAL语言.
pascal编程二元一次方程实数根求二元一次方程 ax*x+bx+c=0(a0)的实数根用PASCAL语言.
这好像是一元二次方程吧?
var
det:real;
a,b,c:integer;
begin
read(a,b,c);
det:=sqr(b)-4*a*c;
if det