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

Question

Информатика

Вильгельмина

7 мая, 12:30

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

+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