14 lines
208 B
Text
14 lines
208 B
Text
program Multisplit;
|
|
|
|
{$APPTYPE CONSOLE}
|
|
|
|
uses
|
|
System.SysUtils;
|
|
|
|
begin
|
|
write('[');
|
|
for var s in 'a!===b=!=c'.Split(['==', '!=', '=']) do
|
|
write(s.QuotedString('"'), ' ');
|
|
write(']');
|
|
readln;
|
|
end.
|