方程 编写

来源：百度知道 编辑：UC知道 时间：2024/06/20 10:36:01
1.求一元二次方程X的平方+3X+2=0
2.交换两个变量的值
用pascal语言的

1.
program F2 (input, output);
uses
SysUtils,Math;
var
a: integer;
b: integer;
c: integer;

D: integer;{判别式}
x1: real;
x2: real;
begin
a:=1;b:=3;c:=2;
D:= b * b - 4 * a * c;

if (D >= 0) then
begin
x1:= (-b + Sqrt(D))/(2 * a);
x2:= (-b - Sqrt(D))/(2 * a);
end；
{D <0 的复数情况也好求，要把实部和虚部分开来求}

end.

2.交换一个变量最好用一个中间变量：swap ：= A；A：=B；B：=swap;
没有查到这样的函数，如果有的话，底层实现原理也是如此，还不如自己这样写。