[Darrrki]

Помогите решить задание:

Используя очередь, решить следующую задачу. Содержимое текстового файла f, разделенное на строки, переписать в текстовый файл g, перенося при этом в конец каждой строки все входящие в нее цифры (с сохранением исходного порядка как среди цифр, так и среди остальных литер строки).

[min@y™]

А каким боком и в каком месте тут надо прикрутить очередь?

[Bargest]

Такая "очередь" пойдет?

Код:

var queue : string;
...
l := length(queue);
for i := 1 to l do
  if (queue[i] >= '0') and (queue[i] <= '9') then queue:= queue+ queue[i];

[min@y™]

Такая "очередь" пойдет?

У меня слово очередь ассоциируется с принципом FIFO, как ни крути.
К тому же, твой код не соответствует условию:

переписать в текстовый файл g, перенося при этом в конец каждой строки все входящие в нее цифры

[Bargest]

Это был прикол. Преподователь сего человека явно не такое решение ждет, я и не вчитывался в задание.