function StrToInt(s: string): Integer;
SCAR Divi 3.00 > Current
Converts a string s to an integer, if s is not an integer the function will return -1.
begin WriteLn(StrToInt('5')); WriteLn(StrToInt('a')); end.
Output:
5 -1