pascal语言中 longint类型的整除出错问题

Question

pascal 开发 POS 程序,procedure fun(freq : longint);
var
     tf : longint;
begin      tf := longint div 10;      ....end;为什么上面这句赋值语句会e出错呢？
在线等解答 谢谢！

Answer 1

 tf   :=   high(longint)   div   10; 

Answer 2

楼上是否会错我意了？只是 longint 类型 整除 10 ,high 函数好像是取 longint 的最大值吧？

Answer 3

不好意思， 打错了pascal   开发   POS   程序, procedure   fun(freq   :   longint); 
var 
          tf   :   longint; 
begin             tf   :=   freq  div   10;             .... end; 为什么上面这句赋值语句会e出错呢？ 
在线等解答   谢谢！

Answer 4

turbo pascal 7.0 编译环境

Answer 5

bp7 编译了一下，没有问题啊program aak;procedure  fun(freq  :  longint);
var
          tf  :  longint;
begin            tf  :=  freq  div  10;
end;
begin
  fun(999);
end.或者你是不是遇到了 200 号 错误？

Answer 6

编译没有错误， 我是烧到 Pos机 上去后， 程序死机换成 integer 后就没有问题。

Answer 7

怪哉，是否是Pos机上的longint和我们pc上的不太一样？

Answer 8

谢谢各位估计是 POS 的问题