刚学delphi,我想设计一个公式,请教大家！

Question

我想设计一个公式：a*b*c/d要计算它的结果，其中abcd都是变量，整数，用delphi如何写代码，刚开始学还不明白。

Answer 1

这个东西,不需要别人教的,登楼主习惯了delphi 后自然就知道了.

Answer 2

var
  a,b,c,d : Integer;
  e : real;
begin
  e :=(a*b*c/d);  
end;

Answer 3

var
  a,b,c,d : Integer;
  e : real;
begin
  e :=(a*b*c/d);  
end;

Answer 4

var
  a,b,c,d :double;
  e ：double;
begin
  e :=(a*b*c/d);
end;

Answer 5

uses
  comobj;procedure TForm1.Button1Click(Sender: TObject);
var
  m_Script: Variant;
  a,b,c,d:string;
  gs:string;//gs:=a*b*c/d;  (gs为你的公式);
begin
  a:=IntToStr(1);
  b:=IntToStr(3);
  c:=IntToStr(2);
  d:=IntToStr(4);
  gs:=a+'*'+b+'*'+c+'/'+d;
  try
    m_Script := CreateOleObject('ScriptControl');
    m_Script.Language := 'JavaScript';
    showmessage(m_Script.Eval(gs));
  except showmessage('error');
  end;
end;以上函数在delphi7中测试通过，该结贴了吧？