Dam*_*ash 10
是程序Val:
procedure Val(S; var V; var Code: Integer);
Run Code Online (Sandbox Code Playgroud)
此过程对十进制和实数进行操作.
Parmeters:
用例:
Var Value :Integer;
Val('1234', Value, Code); // Value = 1234, Code = 0
Val('1.234', Value, Code); // Value = 0, Code = 2
Val('abcd', Value, Code); // Value = 0, Code = 1
Run Code Online (Sandbox Code Playgroud)