如何将字符串中打印的数字转换为整数?
谢谢。
答案 0 :(得分:9)
是程序Val:
procedure Val(S; var V; var Code: Integer);
此程序对十进制和实数进行操作。
<强> 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
答案 1 :(得分:1)
您可以使用Val功能。
示例:
var
sNum: String;
iNum: Integer;
code: Integer;
begin
s := '101';
Val(s, iNum, code);
end.
答案 2 :(得分:1)
您想要Val()
。
答案 3 :(得分:1)
你可以这样使用,
var
i: integer;
s: string;
begin
str(i, s);
write(i);
答案 4 :(得分:0)
Textval := '123';
Val(Textval, Number, Code) ---> Code = 0, Number = 123
Textval := '12345x2';
Val( Textval, Number, Code) ---> Code = 6, Number remains unchanged;
将String转换为数字的值(TextVal,Number,Code)。如果可能的话,代码的结果= 0,否则错误指示号。