Помогите с олимпиадной задачкой! Опции

[Berta]

...недавно прошёл школьный этап олимпиады по информатике. это одна из задач, которую я не смогла решить. помогите, пожалуйста, с решением и если можно объясните как решать...

Во входном файле записана последовательность чисел в странном формате:
у каждого числа сначала записано количество цифр в этом числе, а потом через
пробел - сами цифры. Последовательность заканчивается числом 0.

В выходной файл нужно вывести сначала количество чисел в последовательности,
а потом - сами числа.

Количество чисел в последовательности не превышает 1000. В числах - не более
4-х знаков.

Примеры:
Пример 1
input.txt output.txt
2 2 7 3 3 5 1 0 2 27 351

...заранее спасибо!

[Krjuger]

С решением поможем, вы только продемонстрируйте свои попытки, чтобы было от чего отталкиваться.

[Berta]

С решением поможем, вы только продемонстрируйте свои попытки, чтобы было от чего отталкиваться.

...есть попытка, но она точно неверна, там много чего не хватает...с логикой у меня плохо и без начертанного алгоритма, своими мозгами, дохожу туго...в общем моя блондинистая голова дошла до следующего:

 var a:array [1..1000] of integer;
c,i,x:integer;

begin

assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);

read(x);

for i:=1 to x  do begin
read(a[i]);
end;

c:=0;

for i:=1 to x  do begin
c:=c*10+x;

end;

write©;
end.

...может просто подскажете что сюда добавить ещё нужно и в каком порядке, а я попытаюсь написать...