Дана натуральная числовая последовательность из N чисел. Вывести значения элемен??ов заданной последовательности в прямом порядке, не используя массивы. SROCHNO~!~

Type mas=array of integer; procedure revers(var a:mas; i:integer); begin write(a[i],); if i>0 then revers(a,i-1); end; var a:mas; i,n:integer; begin readln(n); setlength(a,n); for i:=0 to n-1 do read(a[i]); revers(a,n-1); end