Question

Заповнити цілий масив із N елементів шляхом введення значень його елементів з клавіатури. Кількість елементів масиву (N) задається з клавіатури.
1. Вивести сформований масив на екран ПК в рядок (не в стовпчик).
2. Змінити розташування елементів цього масиву за правилом:
- Переставити елементи цього масиву симетрично його середини. 1-й поміняти місцями з останнім; 2-й переставити з передостаннім і т.д.
3. Вивести трансформований масив на екран ПК у рядок.
даю 50 баллів швидко

Answer 1

Ответ:

var a: array[1..100] of integer;

n,i,z: integer;

begin

readln(n);

for i:=1 to n do

 read(a[i]);

for i:=1 to n do

 write(a[i], ' ');

writeln;

for i:=1 to n div 2 do

begin

z:= a[i];

a[i]:= a[n-i+1];

a[n-i+1]:= z;

end;

for i:=1 to n do

 write(a[i], ' ');

end.

Язык программирования Pascal