Предмет: Информатика,
автор: irashmoylbwg
Имеем массив из 45 элементов, каждый из которых в диапазоне [-50;50]. Переставить элементы массива в обратном порядке. Отсортировать массив и вывести его на экран.
Помогите, пожалуйста. Даю 30 баллов
Ответы
Автор ответа:
1
// PascalABC.NET 3.3
begin
var a:=ArrRandom(45,-50,50);
a.Println;
a.Reverse.Println;
a.Sort; a.Println;
end.
Пример (для 10 элементов)
-36 25 -5 -43 -30 40 -9 -38 -42 6
6 -42 -38 -9 40 -30 -43 -5 25 -36
-43 -42 -38 -36 -30 -9 -5 6 25 40
begin
var a:=ArrRandom(45,-50,50);
a.Println;
a.Reverse.Println;
a.Sort; a.Println;
end.
Пример (для 10 элементов)
-36 25 -5 -43 -30 40 -9 -38 -42 6
6 -42 -38 -9 40 -30 -43 -5 25 -36
-43 -42 -38 -36 -30 -9 -5 6 25 40
Похожие вопросы