Перевод на новую строку

[Fanyuus]

Мне нужно сделать перевод на новую строку

for i:=1 to a {какая-то переменная} do
begin
if d[i] mod 2=1 then
write (d[i],' '); {в массиве d хранятся обычные числа}
{тут есть ещё одно действие}
end.

for i:=1 to a {какая-то переменная} do
begin
if d[i] mod 2=0 then
write (d[i],' ');
{тут есть ещё одно действие}
end.

так вот, когда вывожу в output, то он мне выводит всё в одной строке.
а мне нужно тут как бы в две строки вывести.



как быть? что делать? помогите, пожалуйста.
*writeln не поставить, там нужно 2 строчки с пробелами

[GetMax]

*writeln не поставить, там нужно 2 строчки с пробелами

Напишите несколько раз Writeln, и будет вам сколько угодно пустых строк

[Swarog]

for i:=1 to a {какая-то переменная} do
begin
if d[i] mod 2=1 then
write (d[i],' '); {в массиве d хранятся обычные числа}
{тут есть ещё одно действие}
end.
writeln();
for i:=1 to a {какая-то переменная} do
begin
if d[i] mod 2=0 then
write (d[i],' ');
{тут есть ещё одно действие}
end.

[Fanyuus]

Ааааа, спасибо!

[Fanyuus]

сделаю поправку, ТП нужно писать

writeln;

а то он мне ошибку выдавал

[Swarog]

ну если уж все готовое будет это совсем не интерсено

[Fanyuus]

Swarog, вы правы!)))

*задачу решила правильно, нужен был только перевод на новую строку хD