program project1;
uses
sysutils;
const
CArrCnt = 19;
var
x: integer;
y: array[0..CArrCnt] of integer;
s: string; // changes here
dataline: string;
i: Integer;
begin
dataline := 'aaa 123 0 1 2 3 4 5 6 7 8 9 10 11';
s := ' '; // changes here
sscanf(dataline, '%s %d %d %d %d %d %d %d %d %d %d %d %d %d',
[@s, @x, @y[0], @y[1], @y[2], @y[3], @y[4], @y[5],
@y[6], @y[7], @y[8], @y[9], @y[10], @y[11]]);
WriteLn(s);
Writeln(x);
for i := 0 to CArrCnt do
WriteLn(y[i]);
ReadLn;
end.
cHJvZ3JhbSBwcm9qZWN0MTsKCnVzZXMKICAgIHN5c3V0aWxzOwpjb25zdAogICAgQ0FyckNudCA9IDE5Owp2YXIKICAgIHg6IGludGVnZXI7CiAgICB5OiBhcnJheVswLi5DQXJyQ250XSBvZiBpbnRlZ2VyOwogICAgczogc3RyaW5nOyAvLyBjaGFuZ2VzIGhlcmUKICAgIGRhdGFsaW5lOiBzdHJpbmc7CiAgICBpOiBJbnRlZ2VyOwoKYmVnaW4KICAgIGRhdGFsaW5lIDo9ICdhYWEgMTIzIDAgMSAyIDMgNCA1IDYgNyA4IDkgMTAgMTEnOwogICAgcyA6PSAnICAgICAgICAgICc7IC8vIGNoYW5nZXMgaGVyZQogICAgc3NjYW5mKGRhdGFsaW5lLCAnJXMgJWQgJWQgJWQgJWQgJWQgJWQgJWQgJWQgJWQgJWQgJWQgJWQgJWQnLAogICAgICAgIFtAcywgQHgsIEB5WzBdLCBAeVsxXSwgQHlbMl0sIEB5WzNdLCBAeVs0XSwgQHlbNV0sIAogICAgICAgICAgICAgICAgIEB5WzZdLCBAeVs3XSwgQHlbOF0sIEB5WzldLCBAeVsxMF0sIEB5WzExXV0pOwogICAgV3JpdGVMbihzKTsKICAgIFdyaXRlbG4oeCk7CiAgICBmb3IgaSA6PSAwIHRvIENBcnJDbnQgZG8KICAgICAgICBXcml0ZUxuKHlbaV0pOwogICAgUmVhZExuOwplbmQu