В каком смысле? Хоть бы язык написали.
program massiv;
var a:array[1..5]of byte;
i:byte;
begin
for i:=1 to 5 do readln(a[i]); {ввод массива пользователем}
... {какие-то действия с заданным массивом}
for i:=1 to 5 do write(a[i],' '); {вывод в строку, пробел - разделитель}
readln; {пустой readln чтобы можно было прочитать}
end.