Вопрос по информатике:
Найти произведение всех элементов массива вещественных чисел, меньших заданного числа. Размерность массива –10. Заполнение массива осуществить случайными числами от 50 до 100.
Пожаловаться
- 03.12.2016 23:40
- Информатика
- remove_red_eye 6534
- thumb_up 43
Ответы и объяснения 1
Begin
var n := ReadlnReal('n =');
var arr := ArrRandomReal(10, 50, 100).Println;
arr.Where(t -> t p * x).Println;
end.
var n := ReadlnReal('n =');
var arr := ArrRandomReal(10, 50, 100).Println;
arr.Where(t -> t p * x).Println;
end.
Пожаловаться
- 04.12.2016 14:10
- thumb_up 5
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы