1. Информатика
  2. Много ! написать программу

Много ! написать программу которая находит среднее арифметическое элементов массива, состоящая из 100 элементов вещественного типа данных, вводимых вручную

Оксана0990 Оксана0990    2   04.10.2019 19:20    2

Ответы
pidgenatar pidgenatar  27.08.2020 12:48

Const N = 100;

var

mas : array [1..N] of real;

sum : real := 0;

counter : integer := 0;

begin

for var i := 1 to N do begin

readln(mas[i]);

sum += mas[i];

counter += 1;

end;

writeln(sum/counter);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
tanya260516 tanya260516  19.06.2019 02:10
Сформировать массив содержащий 15 случайных целых чисел, принадлежащих промежутку [0; 8] и преобразовать элементы массива по следующему правилу: к четному прибавить...
ання2018 ання2018  19.06.2019 02:10
Девочки аня, даша и варя купили себе флешки синего, белого и красного цветов. на вопрос у кого из них какая флешка, одна из девочек ответила: у ани флешка синяя,...
polyakovred polyakovred  19.06.2019 02:10
1. сформировать внутреннюю и внешнюю файл-функцию. //задан одномерный массив,вывести на печать все элементы, которые равны первому. const n=5; var a: array[1..n]...
Крутойбрат Крутойбрат  14.12.2020 10:21
Создание программ на Паскале, с использованием разветвляющих алгоритмов. создайте прогу, к ней+ блок-схему...
D102006 D102006  14.12.2020 10:21
Ввести масив М[1..10]. Запишіть оператори для реалізації завдань: 1) Знайти добуток лише від ємних елементів;2) Знайти мінімальний елемент;3) Знайти кількість додатних...
665609 665609  14.12.2020 10:22
Assembler . Используя предложенную выше программу, выполните второе задание. Исполнить программу с несколькими (три - четыре) различными (по количеству и по составу)...
DASHAMIronovAAA DASHAMIronovAAA  14.12.2020 10:22
В ячейке H5, чтобы создать формулу для первых зимних Олимпийских игр во Франции вычисляет, во сколько раз больше спортсменов-мужчин, чем участвовало женщин, округляя...
tim4ik114 tim4ik114  14.12.2020 10:22
Дан фрагмент электронной таблицы. Определите значение, записанное в ячейке А2 и В2 * Подпись отсутствуетА2=14, В2=11А2=9, В2=11А2=14, В2=10А2=14, В2=3​...
morgacheva2001 morgacheva2001  14.12.2020 10:24
Учащийся Елжас, занимается боксом, он занял 1 место в олимпиаде по русскому языку, Дана занимается прикладным искусством, она заняла по химии 2 место, Зина и Артем...
ewgexaymnik ewgexaymnik  29.05.2019 12:20
Ввиде нарисуйте в виде графа систему, состоящую из 4-х одноклассников, между которыми существуют следующие связи: дружат: саша и маша, саша и даша, маша и гриша,...

Популярные вопросы