Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
fogle
0 / 0 / 0
Регистрация: 15.05.2011
Сообщений: 2
1

Вывести массив из 50 вещественных чисел от 20 до 40, вычислить среднее арифметическое , посчитать количество элементов.

19.05.2011, 07:15. Просмотров 743. Ответов 3
Метки нет (Все метки)

Добрый день.Задали задание, в паскале я только начинающий. Ничего не могу понять, как и что делать.Если не сложно, помогите сделать.

Вывести массив из 50 вещественных чисел от 20 до 40, вычислить среднее арифметическое , посчитать количество элементов.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.05.2011, 07:15
Ответы с готовыми решениями:

Вычислить среднее арифметическое двух заданных вещественных чисел
Вычислить среднее арифметическое двух заданных вещественных чисел. Входные...

Вычислить среднее арифметическое тангенсов трех вещественных чисел
Вычислить среднее арифметическое тангенсов трех вещественных чисел. Входные...

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

Ввести и вывести массив чисел вручную найти среднее арифметическое его элементов
2. ввести и вывести массив чисел вручную. найти среднее арифметическое его...

Вывести содержимое и посчитать среднее арифметическое чисел
с клавиатуры вводится число n. Создать файл ЦЕЛЫХ ЧИСЕЛ и заполнить его n...

3
ProofX
7 / 7 / 3
Регистрация: 15.05.2011
Сообщений: 31
19.05.2011, 20:24 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
program ProofX1;
uses crt;
var
i,n:integer;
s,sr:real;
a:array [1..50] of real;
begin
 randomize;
 clrscr;
 n:=50;
 for i:=1 to n do
 begin
  a[i]:=random*(20)+20;
  write(a[i]:5:3,' ');
 end;
 for i:=1 to n do
 begin
  s:=s+a[i];
  sr:=s/n;
 end;
 writeln;
 writeln('Среднее арифметическое: ',sr:5:3);
 readln;
end.
Лови) Если напишешь количество КАКИХ элементов тебе необходимо найти, допишу)

Добавлено через 5 часов 42 минуты
Если помог тыкай + )
1
fogle
0 / 0 / 0
Регистрация: 15.05.2011
Сообщений: 2
19.05.2011, 21:23 3
Спасибо большое, но я сам не могу понять каких элементов.Ну как спрошу у учителя - напишу.
0
ProofX
7 / 7 / 3
Регистрация: 15.05.2011
Сообщений: 31
20.05.2011, 00:21 4
Ок, буду ждать, рад помочь чем могу
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
20.05.2011, 00:21

Посчитать количество элементов матрицы, превосходящих среднее арифметическое значение ее элементов
Дана целочисленная матрица А. Посчитать количество элементов матрицы,...

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

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


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru