17 lines
212 B
ObjectPascal
17 lines
212 B
ObjectPascal
|
program Tokenize_a_string;
|
||
|
|
|
||
|
|
{$APPTYPE CONSOLE}
|
||
|
|
|
||
|
|
uses
|
||
|
|
System.SysUtils;
|
||
|
|
|
||
|
|
var
|
||
|
|
Words: TArray<string>;
|
||
|
|
|
||
|
|
begin
|
||
|
|
Words := 'Hello,How,Are,You,Today'.Split([',']);
|
||
|
|
Writeln(string.Join(#10, Words));
|
||
|
|
|
||
|
|
Readln;
|
||
|
|
end.
|