Вопрос по информатике:
Объявить одномерный массив на 12 элементов целого типа , найти среднее арифметическое данных элементов,заменить пятый элемент массива полученным результатом
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 19.04.2017 15:40
- Информатика
- remove_red_eye 10726
- thumb_up 21
Ответы и объяснения 1
Uses crt;
type
massiv = array [1..12] of integer;
var
i,n,summa : integer;
srednee : real;
A : massiv;
begin
clrscr;
write('Введите кол-во элементов : ');readln(n);
summa := 0 ;
for i:=1 to n do
begin
write('Введите ',i, ' элемент : '); readln(A[i]);
summa := summa + A[i];
end;
srednee := summa / n;
A[5] = srednee;
readln;
end.
- 20.04.2017 10:26
- thumb_up 44
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.