Если на Паскале, то вот ↓
Const n=20; m=100;
var
a:array[1..n] of integer;
i:integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
a[i]:=random(m);
write(a[i],' ');
end;
writeln;
writeln('Обратный массив:');
for i:=n downto 1 do write(a[i],' ');
end.
Пример:
Исходный массив:
72 31 25 80 66 64 97 13 40 4 40 46 14 27 45 9 52 46 86 75
Обратный массив:
79 86 46 52 9 45 27 14 46 40 4 40 13 97 64 66 80 25 31 75
Объяснение:
Если на Паскале, то вот ↓
Const n=20; m=100;
var
a:array[1..n] of integer;
i:integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
begin
a[i]:=random(m);
write(a[i],' ');
end;
writeln;
begin
writeln('Обратный массив:');
for i:=n downto 1 do write(a[i],' ');
end;
end.
Пример:
Исходный массив:
72 31 25 80 66 64 97 13 40 4 40 46 14 27 45 9 52 46 86 75
Обратный массив:
79 86 46 52 9 45 27 14 46 40 4 40 13 97 64 66 80 25 31 75
Объяснение: