Вопрос, который вызвал трудности

Дана последовательность чисел, среди которых имеется один нуль. Вывести на печать все числа до нуля включительно.
ABCPascal

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «Информатика». Ваш вопрос звучал так:

Дана последовательность чисел, среди которых имеется один нуль. Вывести на печать все числа до нуля включительно.
ABCPascal

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

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
  var a:=(SeqRandom(ReadInteger('n=')-1,1,99)+Seq(0)).ToArray.Shuffle;
  Writeln('Исходный набор'); a.Println;
  Writeln('Элементы до нуля'); a.TakeWhile(x->x<>0).Println
end.

Тестовое решение:
n= 20
Исходный набор
45 28 62 16 54 29 50 5 39 32 94 95 57 0 53 2 4 86 11 23
Элементы до нуля
45 28 62 16 54 29 50 5 39 32 94 95 57