一个类似13471425498-14484-8598-21的数值
通过这样的计算:13471425498×14484=195120126913032
                        195120126913032+(8598-100)=195120126921530
得到最终结果:195120126921530而另外一个数值的格式为:XXXXXXXXXX(10位)-XXXXX(5位)-XXXX(4位)-XXXX (这个无关紧要)
通过同样的计算方式,要求得到的值也为:195120126921530小弟编程基础比较差。。还请大家帮忙

解决方案 »

  1.   

    是否类似如下:
      for a:=0000000000 to 9999999999 do
        for b:=00000 to 99999 do
          for c:=0000 to 9999 do
            if a*b+c= 195120126921530 then
              showmessage(format('%.10d',[a])'-'+format('%.5d',b)+'-'+format('%.4d',c));
     
      

  2.   

    uses
      ...,comobj;procedure TForm1.Button1Click(Sender: TObject);
    var
      m_Script: Variant;
    begin
      try
        m_Script := CreateOleObject('ScriptControl');
        m_Script.Language := 'JavaScript';
        showmessage( m_Script.Eval('13471425498×14484') );
      except
        showmessage( 'error' );
      end;
    end;