Вопрос по информатике:
Дан массив из 5 элементов. Найти средне арифметическое всех элементов массива.
- 05.09.2018 07:51
- Информатика
- remove_red_eye 18582
- thumb_up 7
Ответы и объяснения 1
Program ArrayAverage;
var a: Array [1..5] of Integer;
i: Integer;
b: Real;
Begin
b := 0;
WriteLn('Введите 5 целых чисел через пробел и нажмите Enter');
For i := 0 To 4 Do
Begin
Read(a[i]);
End;
For i := 0 To 4 Do
Begin
b := b + a[i];
End;
b := b / 5;
Write('Среднее арифметичиское: ');
WriteLn(b:10:2);
End.
- 06.09.2018 18:51
- thumb_up 39
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.