pascalabcnet/InstallerSamples/NETLibraries/System.String/StringConvert.pas

25 lines
766 B
ObjectPascal
Raw Normal View History

2015-05-14 22:35:07 +03:00
var
s: string;
i: integer;
r: real;
begin
// Преобразование строки в число
s := '123,3443'; // Дробная часть отделяется запятой - настройки Windows
2015-05-14 22:35:07 +03:00
if not real.TryParse(s, r) then
Writeln('Строка s не является строковым представлением вещественного числа')
2015-05-14 22:35:07 +03:00
else Writeln(r);
if not integer.TryParse(s, i) then
Writeln('Строка s не является строковым представлением целого числа');
2015-05-14 22:35:07 +03:00
// Преобразование числа в строку
2015-05-14 22:35:07 +03:00
i := 10;
s := i.ToString;
Writeln(s);
s := '';
for i:=1 to 9 do
s += i.ToString;
Writeln(s);
end.