Given an array of 100 elements, fill the array with values For odd ones, the value is one more

Given an array of 100 elements, fill the array with values For odd ones, the value is one more than the index For even ones, one less.

program zz1;
const n = 100; // set the number of elements in the array
var i, s, k: integer; // set variables of integer type
m: array [1..n] of integer;
begin
for i: = 1 to n do // get n random numbers and write them into an array
m [i]: = random (21);
for i: = 1 to n do // display the resulting array on the screen
write (m [i], ”);
writeln; // go to a new line to display the response
for i: = 1 to n do
if m [i] mod 2 = 0 then m [i]: = i – 1 else m [i]: = i + 1;
for i: = 1 to n do // display the resulting array on the screen
write (m [i], ”);
end.