Среднее арифметическое из циклов

30.03.2017, 20:51. Показов 693. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Добрый день!
Вот написал такой код на паскале. Все связано с кол-вом опытов, вычисление вероятности и тому подобное. И сейчас столкнулся с проблемой: требуется посчитать среднее арифметическое n, чтобы сделать вывод о вероятности. Проблема как раз в этом, не могу понять как и куда это закинуть, чтобы n не обнулялось.(ведь кол-во опытов зависит от m, причем n мы еще каждый раз выводим m раз).
И еще есть просьба, помочь запихнуть данную программу в процедуру или в функцию (еще не совсем с ними разобрался).

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
var
  n, i, j, k, v, m: integer;
  x: single;
 
begin
  randomize;
  write('Введите кол-во проведений события: ');
  readln(m);
  for j := 1 to m do
  begin
    k := 0;
    n := 0;
    v := 1;
    
    writeln('Вероятности:');
    repeat
      x := random;
      n := n + 1; 
      write(x:20);
      if x > 0.5 then k := k + 1;
    until k = 2;
    
    writeln;
    writeln;
    write('Кол-во вероятностей: ', n);
    writeln;
    for i := 1 to n do
    begin
      v := v * 2;
    end;
    write('Значение выплаты: ', v);
    writeln;
    writeln;
  end;
end.

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

30.03.2017, 20:51

Ответы с готовыми решениями:

Найти среднее арифметическое положительных и среднее арифметическое отрицательных элементов массива.
Дан массив вещественных чисел А(А1,А2,…,Аn). Найти среднее арифметическое положительных и среднее арифметическое отрицательных элементов...

Процедуры: Получить y = 5,3*a+(a2+6,7)/sin(a+b), где a – среднее арифметическое в массиве C, b –среднее арифметическое в массиве D
помогите решить Следующее условие:Даны 2 массива C (i = 1– n), D (k = 1 – m). Получить y = 5,3 * a + (a2 + 6,7)/sin(a+b), где a – среднее...

Найти сумму и среднее арифметическое арифметическое положительных четных элементов
Массив целого типа, 5 элементов, вводится с клавиатуры. Выводится в столбец. Найти сумму и среднее арифметическое арифметическое...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

30.03.2017, 20:51

Помогаю со студенческими работами здесь

Вычислить среднее арифметическое и среднее геометрическое двух чисел
Помогите пожалуйста, очень нужно, заранее благодарю! Линейные алгоритмы 4. Вычислить и вывести среднее арифметическое двух вводимых...

Найти среднее арифметическое для масива B и среднее геометрическое масива С
Помогите пожалуйста решить задачу: від'ємні елементи масиву А(10) записати в масив В, додатні елементи масиву А записати масив С, знайти...

Даны два числа.Найти среднее арифметическое их квадратов и среднее арифметическое их модулей
Даны два числа.Найти среднее арифметическое их квадратов и среднее арифметическое их модулей Добавлено через 2 часа 31 минуту ...

Вычислить среднее арифметическое положительных и среднее арифметическое отрицательных компонентов массива
Всем приветик) Извините что так много задачек, но поймите сложновато мне с программированием(( за конфетку ;) 1)Задан массив...

Найти среднее арифметическое квадратов двух чисел и среднее арифметическое их модулей
1. Даны два числа. Найти среднее арифметическое их квадратов и среднее арифметическое их модулей.

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Программный отбор элементов справочника Номенклатура по группе 1С Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор под наименованию группы (на. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	Программный отбор элементов справочника Сотрудники по перечислениям 1С Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .

Наверх