Выполнить действия над массивами. В таблице при формулировании задания для разъяснения его сути справа отображены примеры исходных X и результирующих Y массивов с конкретными числами. Программа, естественно, должна обрабатывать...
Выполнить
действия над массивами. В таблице при формулировании задания для разъяснения
его сути справа отображены примеры исходных X и результирующих Y массивов с
конкретными числами. Программа, естественно, должна обрабатывать любые числа для
массивов произвольной размерности N.
Программа должна предъявлять исходные и новые (если требуется) массивы.
Изменить порядок элементов массива X на обратный и заполнить ими массив
Y.
1
2
3
4
5
6
X
6
5
4
3
2
1
Y
Ответ(ы) на вопрос:
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.
Необычная задача=)
Не нашли ответ?
Похожие вопросы