Вопрос по информатике:
Дан массив B, в котором содержится 10 элементов целого типа. Найти:
А) сумму элементов этого массива
Б)произведение элементов этого массива
В) Среднее арифметическое этого массива
Нужен алгоритм паскаль
Например:
Program Summa;
Var B:array (1..10) of integer;
и т.д.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 07.09.2015 19:50
- Информатика
- remove_red_eye 10292
- thumb_up 26
Ответы и объяснения 1
Const
n=10;
var B:array [1..n] of integer;
i,s,cu,k:integer;
cp:real;
begin
cu:=1;
writeln('Введите элементы массива');
for i:=1 to n do begin
b[i]:=random(21)-10;
writeln('B[',i,']=',b[i]);
s:=s+b[i];
cu:=cu*b[i];
inc(k);
end;
cp:=s/k;
writeln('Среднее арифметическое равно ',cp,', Произведение равно ',cu,', сумма равна ',s);
end.
- 08.09.2015 18:45
- thumb_up 49
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.