Подскажите, как вывести массив в строчку с интервалами между числами, и чтобы перед этим массив выводился в столбик?

Для того,чтобы в столбик выводить числа необходимо использовать writeln
for i:= 1 to n 
writeln(x[i]); -Вывод в столбик

ЧТобы выводило в строчку с пробелами write(x[i],' ');