Закодувати повідовлення використовуючи правила кодування наведені в попередньому завданні

226

486

Посмотреть ответы 1

Ответы на вопрос:

konotopnastya

Информатика

4,5(94 оценок)

Var a: array of -100000..100000; n, i: longint; input, output : text; begin assign (input, 'input.txt'); assign (output, 'output.txt'); reset (input); rewrite (output); readln (input, n); setlength (a, n); for i: =0 to n-1 do read (input, a[i]); for i: =n-1 downto 0 do write (output, a[i]); close (input); close (output); end.