Write a function that receives a string containing a 16-bit binary integer. the function must return the string's integer value

Program z;
var
a: integer;
b: string;
begin

readln(b);
a:=strtoint(b)
writeln(a);

end.

Floating freely on the flight deck, sally ride communicates with ground controllers in houston during her sts-7 mission in june 1983. sally ride became the first american woman to go into space when she flew on the space shuttle challenger on june 18, 1983