对不起，我太菜了：）

Question

首先将一次项系数和常数项存入二维数组：(5,3,23),(2,-6,33)
然后在对其进行解之。
常用的方法是找 x 项的系数的最小公倍数，找到之后数组的每项都乘之。
考虑 x 项系数同号问题，然后用常数项相加（或减）去除以 y 项系数的和（或差），得到y 值，最后可求得 x 的值。

Answer 1

我用了八个EDIT，，，前面六是给用户填系数的，，，最后两个是输出结果的
然后，定义了六个整型变量，两个实型变量X，Y，，，再把输到EDIT里的数字传给这六个变量
接下来用这六个变量运算，，a1*x+b1*y=c1
a2*x+b2*y=c2是这样的
procedure form1.button1.click(------)
var
  a1,b1,c1,a2,b2,c2:integer
begin
  a1:=strtoint(edit1.text);
  b1:=.............2.......
  c1:=
  a2:=
  b2:=
  c2:=.............6......
  
   
  
x:=(a1*c2-c1*a2)/(a1*b2-b1*a2)
y:=(b1*c2-c1*b2)/(a1*b2-b1*a2)下面呢，怎么办呢？？
我不会把实型的弄成字符串型啊,怎么在余下的两个EDIT里输出结果呢？
这样做有什么错误呢 谢谢各位了，，，

Answer 2

实型变量转变为字符串使用FloatToStr()函数，
算出结果转换为字符串直接赋值给EDit。
老兄的意思是做成什么样子的啊？