Question

Выполнить действия над массивами. в таблице при формулировании для разъяснения его сути справа отображены примеры исходных x и результирующих y массивов с конкретными числами. программа, естественно, должна обрабатывать любые числа для массивов произвольной размерности n. программа должна предъявлять исходные и новые (если требуется) массивы. изменить порядок элементов массива x на обратный и заполнить ими массив y. 1 2 3 4 5 6 x 6 5 4 3 2 1 y

Answer 1

Var X, Y: array [0..5] of byte;
    i: integer;
begin
     for i := 1 to 6 do X[i-1] := i;

     for i := 0 to 5 do Y[5 - i] := X[i];
end.

Необычная задача=)