Как задать последовательность s1,s2,...,sn-1,sn,sn-1,...,s2,s1.?Паскаль.

Question

Как задать последовательность s1,s2,...,sn-1,sn,sn-1,...,s2,s1.?Паскаль.

Comments

Можно более подробное описание? Мне кажется в последовательности ошибка: s1, s2, ..., sn+1, sn, sn-1, ... , s2, s1

---

Нужно задать последовательность в Паскале,к примеру,так 1,2,3,4,5,4,3,2,1 в математике будет так выглядеть.

---

Теперь понятно, все таки ошибка была в условии.

Answer 1

Var
  i,n:integer;
begin
  Read(n);
  for i:=1 to n do Write(i,' ');
  for i:=n-1 downto 1 do Write(i,' ')
end.

Пример
8
1 2 3 4 5 6 7 8 7 6 5 4 3 2 1