Нужен вывод по горизонтали при программировании Моцарта О.З.

Question

Ниже приведен код, который я сделал для нахождения не простых чисел в диапазоне от 1 до 100 с использованием языка программирования Mozart OZ.

Код в Моцарт OZ:

declare for A in 1..20 do for I in 2..A div 2 break:Ab do if A mod I ==0 then {Browse A} {Ab} end end end

Выход в Моцарте OZ отображается как:

4
6
8
9
10
12...This output is coming Vertically

Тем не менее, я хочу вывод по горизонтали, как показано ниже:

4|6|8|9|10|12....100

Пожалуйста, помогите мне изменить код на языке программирования Mozart OZ, так как я новичок в этом языке. Спасибо.!!

Answer 1

Извините за столь поздний ответ. Я надеюсь, что это полезно для кого-то еще. Я бы сделал что-то вроде этого:

      declare
proc {NotPrime N ?R} %% R for Result.
   R=for A in 1..N collect:C do
        for I in 2..A div 2 break:Ab do
           if A mod I==0 then {C A} {Ab} end
        end
     end
end
{Browse {NotPrime 100}}

Чтобы отобразить полный список, перейдите в «Параметры» в браузере, затем выберите «Параметры отображения...» и установите для параметра «Предел ширины просмотра» большее значение.