Вопрос по информатике:
СРОЧНООООО задайте массив из 10 элементов с помощью датчика случайных чисел.Найдите сумму индексов элементов,которые больше среднего арифметического. Выведите на экран исходный массив и полученную сумму
- 06.02.2018 16:28
- Информатика
- remove_red_eye 12041
- thumb_up 41
Ответы и объяснения 1
Var i,q:integer;s:real;a:array[1..10]of integer;beginfor i:=1 to 10 do begina[i]:=random(100);s:=s+a[i];end;s:=s/10;for i:=1 to 10 do beginwriteln(a[i]);if a[i]>s then q:=q+i;end;writeln(q);end.
- 07.02.2018 06:31
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.