Как в Паскале поменять первый элемент со вторым и предпоследний элемент

Как в Паскале поменять первый элемент со вторым и предпоследний элемент с заключительным? (Одномерный целочисленный массив размерностью N)

Задать свой вопрос
1 ответ

Program tt;

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

      N,B:integer;

Begin

 Read(n);

For i:=1 to n do

    Read(a[i]);

B:=a[1];

A[1]:=a[2];

A[2]:=b;

B:=a[n];

A[n]:=a[n-1];

A[n-1]:=b;

For i:=1 to n do

    write(a[i],,);

End.

 

Владимир Джураханов
Заключительный и предпоследний элементы не меняет
Jurij Pesljan
сейчас поправлю
Ульяна Литковская
поправил
Антонина Баловинцева
Огромное спасибо
Полина Догонина
пожалуйста) отметь как лучший ответ
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт