strtoint in pascal?

Question

my teacher said that i need to use strtoint in my pascal code

but it said that the identifier not found 'strtoint'

this is my code

program kelaslabor;

var
    sBufer:string[5];
    d,m:integer;

begin
    writeln('write date on DD:MM');
    readln(sBufer);
    writeln(sBufer);
    
    {d:=strtoint(sBufer[1])*10 + strtoint(sBufer[2]);
    m:=strtoint(sBufer[4])*10 + strtoint(sBufer[5]);
    writeln(d,' ',m);}

    d:=strtoint(Copy(sBufer,1,2));
    m:=strtoint(Copy(sBufer,4,2));
    writeln(d,'~',m);

end.

Answer 1

Last time I wrote something in Pascal was about 25 years ago, rofl.

Did you miss an include?

Maybe this one helps: https://www.freepascal.org/docs-html/rtl/sysutils/strtoint.html

Answer 2

strToInt is not standardized, but readStr is (in ISO 10206 “Extended Pascal”). You can use readStr pretty much like a regular read/readLn:

readStr('123456', i);

Where i is the name of an integer variable. The string could be of course the name of a (string) variable as well, it doesn’t need to be a constant string literal.

Comments

Good point! I'm glad someone knows their way around  Pascal. :)

Answer 3

Use val()

https://onlinegdb.com/66vqhA_lQ

//abd11a
function strtoint( s:string ):longint;
  var err:integer; i:longint;
  begin
       val(s,i,err);
       strtoint:=i;
  end;

var x:longint;
begin
    x := strtoint('12');
    writeln(x);

end.

Answer 4

You need to import the sysutils into your program.

program kelaslabor;
Uses sysutils;