Безотлагательно. Помогите, пожалуйста. Дам 25 баллов. Напишите программку, которая наполняет массив
Срочно. Помогите, пожалуйста. Дам 25 баллов. Напишите программу, которая наполняет массив случайными числами в спектре [0,20] и сортирует его в порядке убывания, начиная с обозначенного номера элемента
Задать свой вопрос1 ответ
Никита
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программка не работает, обновите версию!
begin
var n:=ReadInteger('n=');
var a:=ArrRandom(n,0,20); a.Println;
var k:=ReadInteger('С какого элемента сортировать?');
Assert(k.Between(0,n-1),'Введено недопустимое значение');
a:=(a?[:k-1]+a[k-1:].OrderByDescending(t-gt;t)).ToArray; a.Println
end.
Пример
n= 13
13 10 4 18 4 1 19 9 14 12 6 15 7
С какого элемента сортировать? 5
13 10 4 18 19 15 14 12 9 7 6 4 1
// Внимание! Если программка не работает, обновите версию!
begin
var n:=ReadInteger('n=');
var a:=ArrRandom(n,0,20); a.Println;
var k:=ReadInteger('С какого элемента сортировать?');
Assert(k.Between(0,n-1),'Введено недопустимое значение');
a:=(a?[:k-1]+a[k-1:].OrderByDescending(t-gt;t)).ToArray; a.Println
end.
Пример
n= 13
13 10 4 18 4 1 19 9 14 12 6 15 7
С какого элемента сортировать? 5
13 10 4 18 19 15 14 12 9 7 6 4 1
Людмила Цекувая
Спасибо большое, но есть пару вопросов? ReadInteger это что?
Ваня Кирейко
спс
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Облако тегов