Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
vishnevskayaya
29.12.2020 03:17 •
Информатика
Заполнить массив из 10 элементов случайными числами от -20 до 10. вывести количество отрицательных элементов
Показать ответ
Ответ:
дАвидИнвалид
08.10.2020 21:07
PascalABC.NET 3.4.0, сборка 1675 от 12.06.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-20,10); a.Println;
Writeln('Отрицательных элементов: ',a.Where(t->t<0).Count)
end.
Пример
-8 -18 2 -7 9 -14 -2 -12 2 7
Отрицательных элементов: 6
0,0
(0 оценок)
Популярные вопросы: Информатика
2006anna1
01.11.2020 06:08
Задання• Дайте определениеГИТЕРСЫЛКА...
пингвиниха20172018
23.12.2020 15:49
Укажи задачи,которые можно выполнить с моделирования.Выбери из списка правильные варианты ответов. Верных ответов:3 Исследование объекта Постановка задачи Анализ Синтез...
стланка
23.12.2020 15:49
Составьте таблицу истинности для следующей логической функции: F = A ∧¬B...
Gfykfyj
02.06.2022 07:46
Укажи процесс,с которого создаётся и исследуется модель.Выбери из списка правильный вариант ответа. Оригинал Субъект Моделирование Модель...
avfvffg
06.08.2020 04:02
Выяснить, сколько раз в натуральном числе встречается его максимальная цифра. например в числе 581088 - 3 раза, в числе 4537 - 1 раз. сделать нужно через while или repeat until....
Книжнаябабочка
06.08.2020 04:02
Запишите просто дано: реферат учащегося по имеет объем 110 кбайт. каждая его стр. содержит 40 строк по 64 символа.при этом в кодировке 1 символ кодируется 16 битами. сколько...
lizakonnova
27.10.2020 01:02
Интегрированные информационные системы апк, их назначение....
yuliasitnikova
23.02.2022 02:54
Составьте таблицу истинности логического выражения: (av-b)& c ...
Allagivorgizova1392
15.05.2023 18:03
Круги эйлерадоличные дела|новые разработки = 13личные дела& новые разработки = 2личные дела = 7послеличные дела|новые разработки = 19личные дела& новые разработки =...
anitakuznetsova
21.02.2020 01:49
Мне нужно осчастливить свою сестру. у кого есть приставка xbox и у кого на нём установлен роблокс скажите , там в роблокс есть игра ripullminigames и там есть всякие pods с...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-20,10); a.Println;
Writeln('Отрицательных элементов: ',a.Where(t->t<0).Count)
end.
Пример
-8 -18 2 -7 9 -14 -2 -12 2 7
Отрицательных элементов: 6