计算'2+3+3>9'是否为真，怎么做？另外求出'2+3*6'的值应该怎么写？

Question

计算'2+3+3>9'是否为真，怎么做？另外求出'2+3*6'的值应该怎么写？

Answer 1

if 2+3+5>9 then
var v:integer;
v:=2+3*6

Answer 2

娄主的意思是 '2+3*6' 是一个字符串
var
  s:string;
begin
  s:='2+3*6';
end

Answer 3

2+3*6是参数，传过来的
function (expr:string):Boolean;
begin
  result := Evaluate(Expr);
end;
关键是这个Evaluate(Expr:string):Boolean;怎么写

Answer 4

一个一个字符判断，用ascii码判断是数字还是运算符，很多delphi的书里面都有类似的实例。

Answer 5

function (a,b,c,d:integer):Boolean;
begin
result := Evaluate(Expr);
end;
写一个函数就行了。

Answer 6

告诉你一个最简单的方法吧。
用数据库来计算。
如是ORACLE则sql语句 select 2+3*6 from dual
如是sql server则sql语句 select 2+3*6
则可以得到结果

Answer 7

告诉你一个最简单的方法吧。
用数据库来计算。
如是ORACLE则sql语句 select 2+3*6 from dual
如是sql server则sql语句 select 2+3*6
则可以得到结果

Answer 8

请察看HubDog得葵花宝典，里面有一篇简单的表达式解析的文章。

Answer 9

tw_cshn(一无所有):高，实在是高！