tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу определения
Составить программу определения количества чисел, равных 5, в массиве, элементы которого сформированы датчиком случайных чисел. размер массива 15,диапазон от 0 до 10.
gladchenko77
3 26.08.2019 14:50
0
Ответы
Данил9323
31.08.2020 22:21
Да-да, Ваша задача фактически решается в одну строку.
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ArrRandom(15,0,10).Println.Where(x->x=5).Count)
end.
Пример
8 4 4 0 9 1 5 2 0 7 5 3 0 5 3
3
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
abduabdu2015
06.08.2019 00:20
Составьте программу, определяющую, является ли последняя цифра трехзначного числа нечетным числом...
Ринатеовллктаоа
06.08.2019 00:20
Перевести в байты 2,3 гбайт, 4031 мбайт...
hgfgff1Fgfh
05.08.2019 18:00
15. возможно ли востановить файлы удаленные с дискета? 16. возможно ли востановить файлы удаленные из корзины? если да, то каким образом?...
Водород56
05.08.2019 18:00
Запишите с римских цифр дату своего рождения 05.06.2003...
AnnaNazar07
25.10.2020 17:46
Заполните пропущенное (пустое) место?...
RRuslan619
25.10.2020 17:45
1. Декодировать сообщение (ключ к кодировке -5) Нтщухсеынд фу цфуцуёш жуцфхндчнд сулйч ёачб жнмшербтуо мжшпужуо жпшцужуо уёутдчйрбтуо н уцдмечйрбтуо...
БолатовДосжан
25.10.2020 17:39
задано количество символов n в предложении. составить алгоритм нахождения информационного обьема предложения в кодировке unicode в байтах и битах...
208дитма802
17.04.2019 01:50
Для участников пробега надо выбрать самый короткий маршрут из Соснограда в Голубые Ели. Через какие населённые пункты он проходит?...
МарвиСК
17.04.2019 01:50
Перед соревнованиями по плаванию бассейн за 15 мин заполнили свежей водой. Сколько всего литров воды налили в бассейн, если через 10 мин там...
СэмТV
17.04.2019 01:50
Среди пяти глубочайших океанских впадин называют Курило-Камчатскую и Филиппинскую. Известно , что глубина Филиппинской впадины 2 м меньше глубины...
Популярные вопросы
Сочинение о моём питомце 4-5 предложен....
2
Этот вопрос для 10 класса: кто и как разгромили взгляды виталистов?...
1
Как правильно сократить дробь 64*48/56*72...
2
Округлите число 4836,2951 до сотых б) 491,9567 до десятых...
1
Напишите морфологический разбор слова далёкий...
1
Определить протежённость россии с севера на юг по 110-му меридиану(длина...
1
(x-(x/(1-/(3x^4/(x^2-2x+1)) при х=1/6...
3
Какой механизм регулирования дает лучшую возможность распределения...
3
Обратить в дробь десятичное число: 1,2(7)...
2
Определить массу 0.1 моль гидроксида натрия...
1
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ArrRandom(15,0,10).Println.Where(x->x=5).Count)
end.
Пример
8 4 4 0 9 1 5 2 0 7 5 3 0 5 3
3