logo
Войти Регистрация Спроси ai-bota


ВАНЯПУХОВ
19.06.2022 11:21

Даны 10 чисел. выведите в порядке убывания все различные из них паскаль

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
mashanemiro110p08m38
mashanemiro110p08m38
17.02.2023 00:06
Var x: array [1..10] of integer; procedure reachat(a: integer); var i: integer; begin for i: =1 to 10 do write (x[i], ); end; var i,a: integer; begin read(a); for...
ivanovgeorg123георг
ivanovgeorg123георг
23.11.2020 06:22
. Які з властивостей Кнопки (Button) їй не належать?OpacityStartPosition sizeFontvisible​...
КрутойМиха
КрутойМиха
11.10.2020 22:52
Program o; uses crt; var B:array[1..10] of integer; i,k,n,kol:integer; begin writeln ( vvedite kol-vo elementov massiva ); readln(n); for i:=1 to 10 do begin writeln...
анонім2281104
анонім2281104
26.11.2020 05:20
Многопроводная линия для информационного обмена данными между устройствами компьютера называется: 1.шиной (магистралью) 2.плоттером 3.модемом 4.контроллером...
lynnikova05
lynnikova05
26.11.2020 05:20
Турбо паскаль! факториалом числа m называется произведение натуральных чисел от 1 до m. m! =1*2*3*..*m; 4! =1*2*3*4=24. требуется написать программу, которая подсчитывает...
Llirika
Llirika
06.12.2020 22:13
Чому Король Великобританії був не задоволений ? а)його люди не мали для себе небаб) його народ не був могутній і багатий в) не було кохання між його людьми До ть...
mukola11
mukola11
08.12.2021 16:07
До ть,будьласка! Визначте алкан, густина пари якого за воднем становить 36...
He12022005
He12022005
08.12.2021 16:07
1 ст) тропы2 ст) цитаты3 ст) объяснениезаполните таблицу​...
Саидушка2006
Саидушка2006
08.12.2021 16:07
У районах утворення боліт зволоження зазвичай а.) достатнє б.) надмірне в.) недостатнє​...
nevidomskyamarg
nevidomskyamarg
30.11.2021 17:27
написать эссе по английскому языку на тему How about my summer holiday when there is corona virus nowadays 150-100 слов...
Ответ:
gagarinov51
06.10.2020 23:34
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  ReadSeqInteger(10).Distinct.OrderByDescending(x->x).Println
end.

Пример
18 -6 0 14 6 9 0 26 -6 12
26 18 14 12 9 6 0 -6
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота