Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.76/21: Рейтинг темы: голосов - 21, средняя оценка - 4.76
0 / 0 / 0
Регистрация: 26.10.2011
Сообщений: 33

Найдите среднее арифметическое чисел, не попадающих в промежуток AB

26.10.2011, 22:11. Показов 4119. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
найдите среднее арифметическое чисел не попадающих в промежуток [A,B] и подсчитать количество положительных чисел стоящих на местах кратных 3
заранее спасибо
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
26.10.2011, 22:11
Ответы с готовыми решениями:

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

Найдите среднее арифметическое чисел ряда: 3, 4.3, 5.6...
program sm2; uses crt; var i,n,s:integer; p,k:real; begin s:=0; k:=3; write('введите количество чисел= '); readln(n); for...

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

5
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
27.10.2011, 12:01
Цитата Сообщение от Ises Посмотреть сообщение
чисел не попадающих в промежуток [A,B]
А Вы знаете сколько их и каковы из значения? Это же бесконечность...
0
0 / 0 / 0
Регистрация: 26.10.2011
Сообщений: 33
27.10.2011, 18:56  [ТС]
есть матрица 3 на 5 .., а промежуток взять любой например..
|-2 5 1 5 -8|
| 6 2 8 4 -4|
|-4 2 -7 1 3|
а промежуток взять от -1 до 5..
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
27.10.2011, 19:28
Цитата Сообщение от Ises Посмотреть сообщение
чисел стоящих на местах кратных 3
Где в матрице места, кратные 3? Может все же это одномерный чассив?
0
 Аватар для Vepsar
33 / 32 / 14
Регистрация: 11.08.2011
Сообщений: 158
27.10.2011, 19:54
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Вот)
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
36
37
38
39
40
41
42
43
44
45
46
47
48
var
x:array [1..100] of integer;
a,b,n,k,i,m,l,q,k1,m1:integer;
sr:real;
begin
m:=0;
m1:=0;
k:=0;
k1:=0;
l:=0;
write('Vvedite kol-vo chisel:');
readln(n);
write('Vvedite a:');
readln(a);
write('Vvedite b:');
readln(b);
for i:=1 to n do
begin
write('Vvedite chislo nomer',i,':');
readln(x[i]);
end;
q:=a;
if a>b then
begin
a:=b;
b:=q;
end;
for i:=1 to (a-1) do
begin
m:=m+x[i];
k:=k+1;
end;
for i:=(b+1) to n do
begin
m1:=m1+x[i];
k1:=k1+1;
end;
sr:=(m+m1)/(k+k1);
for i:=1 to n do
begin
if i mod 3=0 then
if x[i]>0 then
    l:=l+1;
end;
writeln('Srednee arifmet. ravno:',sr);
writeln('Kol-vo chisel: ',l);
readln;
end.
1
0 / 0 / 0
Регистрация: 26.10.2011
Сообщений: 33
29.10.2011, 13:59  [ТС]
спасибо)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
29.10.2011, 13:59
Помогаю со студенческими работами здесь

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

Найдите сумму, количество и среднее арифметическое всех целых чисел из интервала [100; 200], кратных 17
найдите сумму,количество и среднее арифметическое всех целых чисел из интервала кратных 17

Найти среднее арифметическое среди значений элементов файла, попадающих в интервал от A до В
Ввести файл F. Найти среднее арифметическое среди значений элементов файла, попадающих в интервал от A до В (вводятся с клавиатуры). Если...

Найдите сумму, количество и среднее арифметическое всех целых чисел из интервала [200,400] в записи которых есть цифра 5
Найдите сумму, количество и среднее арифметическое всех целых чисел из интервала в записи которых есть цифра 5.

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


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru