Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 24.06.2009
Сообщений: 22

Найти среднее арифметическое

26.01.2010, 22:36. Показов 542. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте! Я дико извиняюсь, но мне очень нужна нужна ваша помощь. Необходимо написать совсем простенькую программку, но я и этого сделать не могу Я просто полный ноль в этой сфере.
Вот задание: "Найти среднее арифметическое максимального и минимального элемента массива"

Помогите, пожалуйста! Очень на Вас надеюсь!
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
26.01.2010, 22:36
Ответы с готовыми решениями:

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

Найти среднее арифметическое этих чисел и среднее геометрическое их модулей
Даны два действительных числа. Найти среднее арифметическое этих чисел и среднее геометрическое их модулей. подскажите в чём ошибка...

Файл: найти среднее арифметическое, найти число, ближайшее к среднему арифметическому
с помощью датчика случайных чисел создать файл из 40 целых чисел.вывести все четные числа из него. посчитать их кол-во .найти их среднее...

3
 Аватар для Тамила
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
26.01.2010, 22:46
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
uses crt;
var
a:array[1..100]of integer;
i,n,max,min:integer;
sr:real;
begin clrscr;
write('n=');
read(n);
for i:=1 to n do
 begin
  write('a[',i,']=');
  read(a[i]);
 end;
writeln;
for i:=1 to n do
write(a[i],'  ');
writeln;
max:=a[1];
min:=a[1];
for i:=1 to n do
 begin
  if a[i]>max then max:=a[i];
  if a[i]<min then min:=a[i];
 end;
writeln('max=',max);
writeln('min=',min);
sr:=(max+min)/2;
writeln('(max+min)/2=',sr:2:2);
readkey;
end.
1
0 / 0 / 0
Регистрация: 24.06.2009
Сообщений: 22
26.01.2010, 22:50  [ТС]
Спасибо Огромнейшее!!!!!!! Тамила, Вы моя спасительница
0
26.01.2010, 22:51

Не по теме:

На здоровье...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
26.01.2010, 22:51
Помогаю со студенческими работами здесь

найти среднее арифметическое
Даны натуральное число n, действительная матрица размера n x 9. Найти среднее арифметическое каждого из столбцов.

Найти среднее арифметическое
помогите решить пожалуйста.заранее спасибо) 1. Найти среднее арифметическое элементов массива А(10). 2. Найти среднее арифметическое...

найти среднее арифметическое
Дан одномерный массив чисел. Найти среднее арифметическое элементов больших данного числа A(число A вводить с клавиатуры).

Найти среднее арифметическое...
Пусть дано натуральное число n и вещественная матрица nх9. Найти среднее арифметическое ее элементов для каждого из столбцов.

Найти среднее арифметическое массива
как найти среднее арифметическое массива


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Архитектура слоя интернета для сервера слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru