Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.53/40: Рейтинг темы: голосов - 40, средняя оценка - 4.53
0 / 0 / 0
Регистрация: 15.09.2019
Сообщений: 74
1

Напишите программу, которая вычисляет сумму и среднее арифметическое значение последовательности положительных чисел,

04.12.2019, 22:05. Показов 7994. Ответов 2

Author24 — интернет-сервис помощи студентам
Напишите программу, которая
вычисляет сумму и среднее арифметическое значение последовательности
положительных чисел, которые вводятся с клавиатуры (длина последовательности
вводится с клавиатуры)
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
04.12.2019, 22:05
Ответы с готовыми решениями:

Напишите программу, которая в последовательности целых чисел определяет среднее арифметическое положительных чисел
Напишите программу, которая в последовательности целых чисел определяет среднее арифметическое...

Написать программу, которая через функцию вычисляет сумму и среднее арифметическое положительных
Помогите пожалуйста . дан массив целых чисел. Написать программу которая с через функцию вычисляет...

Напишите программу, которая вычисляет среднее арифметическое чисел, находящихся в файле numbers.txt
Ребят, есть условие и решение задачи, объясните пожалуйста комментариями ее решения, очень нужно....

Напишите программу, которая вычисляет среднее арифметическое чисел, находящихся в файле D:\numbers.txt
Напишите программу, которая вычисляет среднее арифметическое чисел, находящихся в файле...

2
2373 / 775 / 561
Регистрация: 15.01.2019
Сообщений: 2,394
04.12.2019, 23:09 2
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
program Project1;
var
  a: array [1..100] of integer; { Переменная для  хранения массива.}
  n: integer; {  Переменная для хранения значения количества элементов в массиве.}
  i: integer; { Вспомогательные переменные для организации циклов.}
  sum: integer; {Переменная для хранения значения суммы}
  srareth: real; {Переменная для хранения значения среднего арифметического}
begin
  write('Введите значение максимального количества вводимых элементов последовательности: ');
  Readln(n);
  for i:= 1 to n do
    repeat
      write('Введите значение ',i,' элемента: ');
      Readln(a[i]);
    until a[i] > 0;
  writeln('Исходный массив: ');
  for i:= 1 to n do
    begin
      write(a[i]:5);
      if i mod 10 = 0 then
        writeln;
    end;
  sum:= 0;
  for i:= 1 to n do
    sum:= sum + a[i];
  writeln;
  writeln('Сумма элементов массива: ', sum);
  writeln('Среднее арифметическое элементов массива: ', (sum/n):0:2);
  Readln;
end.
0
Модератор
10007 / 5364 / 3338
Регистрация: 17.08.2012
Сообщений: 16,342
05.12.2019, 13:01 3
ValentinNemo, задача на последовательность, массив не нужен. Нигде в задании не указано, что члены последовательности - целые числа.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
  i, n: integer;
  x, s, a: real;
 
begin
  s := 0;
  write('n = ');
  readln(n);
  for i := 1 to n do
    begin
      write('Число ', i, ' = ');
      readln(x);
      s := s + x
    end;
  writeln('Сумма = ', s);
  a := s / n;
  writeln('Средне арифметическое = ', a);
  readln
end.
0
05.12.2019, 13:01
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.12.2019, 13:01
Помогаю со студенческими работами здесь

Написать программу, которая вычисляет среднее арифметическое последовательности дробных чисел
программа с++ помогите с программой, выдает ошибку и закрывается после ввода количества чисел ...

Написать программу, которая вычисляет среднее арифметическое последовательности дробных чисел, вводимых с клавиатуры
Написать программу, которая вычисляет среднее арифметическое последовательности дробных чисел,...

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

Создать программу, которая вычисляет среднее арифметическое последовательности дробных чисел вводимых с клавиатуры
Создать программу которая вычесляет среднее арифметическое последовательности дробных чисел...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru