tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дан массив из 100 целых чисел.
Дан массив из 100 целых чисел. найти сумму 10 самых маленьких чисел. 20 !
lkQwertyuiop1
3 25.09.2019 00:01
2
Ответы
vickatrasyuk
11.08.2020 02:02
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(100,-99,99); a.Println;
Writeln('Сумма 10 самых маленьких чисел ',a.Sorted.Take(10).Sum)
end.
Пример
-61 91 33 86 -69 88 -86 60 -78 -63 -30 -39 -33 24 -94 -11 -26 18 59 -9 -82 50 9 28 -34 -8 5 46 59 25 -19 92 -1 93 50 -33 -94 -19 -26 -43 21 -54 -27 -59 80 -95 12 2 -23 93 99 -30 44 -51 61 -12 -18 -94 20 39 -16 -32 -98 -4 55 -22 61 -26 73 39 -16 93 -55 3 69 72 -23 -31 48 -38 79 -96 -30 65 26 -88 -51 -49 -68 -38 84 -99 60 34 72 -46 -55 77 -15 2
Сумма 10 самых маленьких чисел -926
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Манипуляция
06.12.2019 13:46
Написать программу на паскале. вставить значение порядкового номера последнего четного элемента перед вторым по значению наибольшим элементом массива....
Daxada
06.12.2019 13:53
Надо . обязательно призинтацию...
Даня100000000
06.12.2019 13:53
Напишите программу в паскаль, сколько могу ...
kafdiana9
06.12.2019 14:00
молю бога мне ! 50 ! легкое !...
ботаник041
06.12.2019 14:03
Вмассиве из 10 положительных целых чисел первый элемент заменить суммой всех четных элементов массива....
gmejenny
06.12.2019 14:11
Дан двухмерный массив 5на5, числа генерируются от -10 до 10. нужно найти все четные числа, разделить их на 2 и вывести в паскале...
alzqsanko
06.12.2019 14:24
Файл размером 1450 кбайт передаётся через некоторое соединение в течение 40 секунд. определите размер файла (в кбайт), который можно передать через это соединение за 60 секунд....
vladlena217
06.12.2019 12:33
Решить 7 или 8 (на выбор). программа visual studio....
Mako9375
06.12.2019 12:47
Решить две . python, програмирование....
darkforse876
06.12.2019 13:08
Получить одномерный массив состоящий из произведений ненулевых элементов соответствующих строк матрицы...
Популярные вопросы
Задание. Составьте синквейн на тему «Царь Хаммурапи» 1. Одно существительное2. ...
1
Зар заман жыры 7сынып 5-тапсырма. Жырдағы көріктеу құралдарын талдап көрсе...
1
Качества учителя, затрудняющие общение. Инструкция: выберите 10 из 30 личностных...
2
Напишите, как вы относитесь к сортировке мусора, и применяете ли вы эти методы...
1
Какие упражнения на бревне названы неправильно? Выберите все правильные...
2
Функцияның графигін салыңыз 1)y=x+4 2)y=x-2 3)y=7-x 4)y=-3-x 5)y=0,6x-1 6)y=32,5x...
1
Любой кто увид..т рук..писи Пушкина, убедит(?)ся в каком терпел..вом, настойч..вом...
1
С 1-8!Свойство равнобедренного треугольника найти угол DBA...
2
1) Мына сурет таныс па? Ол туралы не білесің? 2) Қазақстан жерінен осындай...
3
Вычислите какой объём займут 1,5*10 в 22 степени молекул кислорода при н.у...
3
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(100,-99,99); a.Println;
Writeln('Сумма 10 самых маленьких чисел ',a.Sorted.Take(10).Sum)
end.
Пример
-61 91 33 86 -69 88 -86 60 -78 -63 -30 -39 -33 24 -94 -11 -26 18 59 -9 -82 50 9 28 -34 -8 5 46 59 25 -19 92 -1 93 50 -33 -94 -19 -26 -43 21 -54 -27 -59 80 -95 12 2 -23 93 99 -30 44 -51 61 -12 -18 -94 20 39 -16 -32 -98 -4 55 -22 61 -26 73 39 -16 93 -55 3 69 72 -23 -31 48 -38 79 -96 -30 65 26 -88 -51 -49 -68 -38 84 -99 60 34 72 -46 -55 77 -15 2
Сумма 10 самых маленьких чисел -926