奇怪的Pascal问题


不懂pascal,现学现卖的写了一小段程序。


unit TestUnit;

interface
function div2(a : LongInt; b : LongInt) : LongInt;

implementation

function div2(a : LongInt; b : LongInt) : LongInt;
begin
Result := a div b;
if (a mod b) > 0 then
begin
Inc(Result);
end;
end;

end.




奇怪的是一直出现 Identifier not found "Result"的错误,如果把Result改成div2,则一切都正常。。。。。有懂pascal的先进指点一下迷津吧?
问题补充
tapestry1122 写道
night_stalker 写道
我也不懂,不过感觉需要

var
  Result: LongInt;



不需要

lz,我在d7里能编译过你的这段代码啊。


奇怪,Free Pascal死命的报错,我用Prism试看看。。。

google:

you have to activate the Delphi or ObjFPC compilation mode.

我也不懂,不过感觉需要

var
Result: LongInt;

我也不懂,

不过怎么感觉和python有点象嘛?

[quote="night_stalker"]我也不懂,不过感觉需要

var
Result: LongInt;
[/quote]

不需要

lz,我在d7里能编译过你的这段代码啊。

好久不写delphi都忘了 :oops:
难道要小写result
难道是版本问题,没有result关键字