Помогите написать программу ** паскале абс тема "Перестановка элементов в одномерном...

0 голосов
27 просмотров

Помогите написать программу на паскале абс
тема "Перестановка элементов в одномерном массиве. "

Дан массив размера N. Переставить в обратном порядке элементы массива,
расположенные между его третьим и седьмым элементами, включая эти элементы.


Информатика (29 баллов) | 27 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

//PascalABC.NET 3.1 сборка 1200
const
  n = 10;

begin
  var a := ArrRandom(n, -50, 50);
  a.Println();
 
  for var i := 0 to (7 - 3) div 2 do
  begin
    var t := a[3 + i];
    a[3 + i] := a[7 - i];
    a[7 - i] := t;
  end;
  a.Println();
end.

(53.1k баллов)