Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
кросавиться11111
14.02.2020 12:09 •
Информатика
Подсчитать среди 30 целых случайных чисел из интервала [ -5; 50] количество чисел, меньше 0.
Показать ответ
Ответ:
MGap58
24.09.2020 23:35
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=ArrRandom(30,-5,50); a.Println;
Writeln('k=',a.Where(x->x<0).Count)
end.
Тестовое решение:
24 39 36 2 -3 -3 29 32 24 -3 11 14 17 -4 -1 13 13 36 24 49 41 27 17 20 24 32 36 -2 -1 7
k=7
0,0
(0 оценок)
Популярные вопросы: Информатика
gleb217
29.07.2020 08:53
почему другие программы не имеют доступа к открытому в программе файлу когда он заблокирован в соответствии с правилами?...
Danay2908
15.09.2020 19:44
Определите значение переменной с после выполнения следующего фрагмента программы. ответ запишите в виде целого числа. а := 28 b := 10а := 3 * b - а если а bто с := 2 * а - b иначе...
asya343434
10.02.2023 00:34
Приведи в соответствие.ALT+4ALT+3ALT+1ALT+5ALT+9ALT+14...
eromadima
29.05.2021 22:47
Сор по информатике ОТВЕТЫ...
Mlpoiuytrewqazxcvbn
30.05.2021 22:30
Яка властивість відповідає за видимість зображення? Какое свойство отвечает за видимость изображения?( )...
Sanyaaa12
17.05.2023 01:52
Заполни пропуски в программный вывод на экран кубов чисел от 13 до 7...
marinazajcik0
10.07.2022 18:57
Дан треугольник nmk. в нём угол n равен 75 градусов, угол k равен 45 градусов, а сторона nk равна 4 корня из 3 см. чему равна сторона mn?...
KotesUA
17.01.2020 04:17
Используя метод электронного , определите коэффициенты в следующей схеме реакции. cuo+nh3- n2+cu+h2o...
Амон11111
17.01.2020 04:17
Какие события происходили одновременно с петровскими реформами в россии? а) воцарение ст. лещинского в польше б) объединение италии в) реформация в германии г) великая французская...
JackTheBit
17.01.2020 04:17
Инфляция составляет 10% каждый месяц.сколько она составит за два месяца? 20%?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var a:=ArrRandom(30,-5,50); a.Println;
Writeln('k=',a.Where(x->x<0).Count)
end.
Тестовое решение:
24 39 36 2 -3 -3 29 32 24 -3 11 14 17 -4 -1 13 13 36 24 49 41 27 17 20 24 32 36 -2 -1 7
k=7