Дана последовательность чисел s1,. нужно вывести её на экран в прямом и обратном порядке,что бы выглядело так s1,,s1.

Const n=5;
var s:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do readln(s[i]);
for i:=1 to n do write(s[i],' ');
for i:=n-1 downto 1 do write(s[i],' ');
end.

Пример:
45
97
13
46
50
45 97 13 46 50 46 13 97 45 

Введите символы:Даны символы s1, s2, ... Известно, что символ s1 отличен от точки
n = 21
а)
 ,2s ,1s ыловмис ынаД
б)
Дн ивл 1 2