помогите написать программу на паскале абс
тема "Перестановка элементов в одномерном массиве. "
Дан массив размера N. Переставить в обратном порядке элементы массива,
расположенные между его третьим и седьмым элементами, включая эти элементы.
Ответы
Ответ дал:
1
//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.
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.
Вас заинтересует
5 месяцев назад
5 месяцев назад
1 год назад
5 лет назад
5 лет назад
7 лет назад