RosettaCodeData/Task/Determine-if-a-string-is-numeric/PascalABC.NET/determine-if-a-string-is-numeric.pas

function IsNumeric(s: string): boolean;
begin
  var i: integer;
  Result := integer.TryParse(s,i)
end;

begin
  var s := '123';
  if IsNumeric(s) then
    Print('string is numeric')
end.