Срочно. Напишите программу, которая заполняет массив случайными числами в диапазоне [a, b], выводит его на экран, а затем выполняет реверс отдельно первой и второй половин массива. При изменении количества элементов в массиве программа должна работать правильно без дополнительных изменений. Пожалуйста, с объяснениями и комментариями.
Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (n,a,b):=ReadInteger3('Введите размер массива и границы диапазона:');
var M:=ArrRandom(n,a,b); M.Println;
var d:=n div 2; // середина массива
M:=(M[:d].Reverse+M[d:].Reverse).ToArray; M.Println
end.
Пример
Введите размер массива и границы диапазона: 16 10 99
68 50 17 92 62 69 18 16 36 83 27 68 98 92 44 12
16 18 69 62 92 17 50 68 12 44 92 98 68 27 83 36
// Внимание! Если программа не работает, обновите версию!
begin
var (n,a,b):=ReadInteger3('Введите размер массива и границы диапазона:');
var M:=ArrRandom(n,a,b); M.Println;
var d:=n div 2; // середина массива
M:=(M[:d].Reverse+M[d:].Reverse).ToArray; M.Println
end.
Пример
Введите размер массива и границы диапазона: 16 10 99
68 50 17 92 62 69 18 16 36 83 27 68 98 92 44 12
16 18 69 62 92 17 50 68 12 44 92 98 68 27 83 36
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад