if、函数、递归 老是报错！！！Delphi(Pascal) codefunction func(x:integer):integerbeginif(x0) thenresult
if、函数、递归 老是报错！！！
- Delphi(Pascal) code
function func(x:integer):integer;begin if(x=0) then result 0 else result x*func(x-1);end;
错在哪了呢？
[解决办法]
首先是语法错误 result 0 应为result:=0,依此类推。