Ответы на вопрос:
var m: array [1..10000] of integer; i,n: integer; begin readln(n); for i : = 1 to n do read(m[i]); for i : = 1 to n do write(m[i], ' '); writeln; for i : = n downto 1 do write(m[i],' ') end.
Популярно: Информатика
-
hamkochan02.12.2022 17:51
-
райымбек4214.08.2022 10:24
-
cabans35421.11.2022 07:23
-
anutik416.10.2022 14:16
-
KaratisT22221.09.2020 13:47
-
zizi13112.06.2021 16:08
-
Юлька160625.10.2021 22:41
-
umnik8453024.04.2022 11:41
-
Anyta1511106.03.2021 09:20
-
Vikaadamm13.12.2020 23:22