Delphi Compiler Error
E2023 Function needs result type
Reason for the Error & Solution
You have declared a function, but have not specified a return type.
program Produce; function Sum(A: array of Integer); var I: Integer; begin Result := 0; for I := 0 to High(A) do Result := Result + A[I]; end; begin end.
Here Sum is meant to be function, we have not told the compiler about it.
program Solve; function Sum(A: array of Integer): Integer; var I: Integer; begin Result := 0; for I := 0 to High(A) do Result := Result + A[I]; end; begin end.
Just make sure you specify the result type.