Задание из ВУЗа

@DekBlack · Регистрация: 29.10.2013

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

Даны С, m и массив T(m). Найти число элементов массива T(m), меньших С, а для элементов, больших С, найти их среднее арифметическое.

@Sead · 29.10.2013, 14:59

Сообщение от DekBlack

Даны С, m и массив T(m)

тоесть 3 массива?

@Крюгер · 29.10.2013, 15:01

а что трудного в этом? между прочим с минимальными знаниями любого яп, это делается за мин 30, не более

Добавлено через 44 секунды
и да, С это констатнта? или массив?

@Sead · 29.10.2013, 15:02

Сообщение от DekBlack

меньших С

меньших от чего? и если можно выложите задачу полностью т.е как она звучит

Добавлено через 59 секунд

Сообщение от Крюгер

минимальными знаниями любого яп

а ЯП это как переводится? ЯРОГО ПРОГРАМЕРА?

@Крюгер · 29.10.2013, 15:03

Sead, не, я вот реально не вижу проблемы, чтобы её решить.
Ну хочешь ты сделать задание из ВУЗа, тык выучи яп и сделай,
не можешь попроси фрилансов в конце концов

@DekBlack · 29.10.2013, 15:03 **[ТС]**

А это и есть полное задание

@Крюгер · 29.10.2013, 15:04

в судя по данной теме, яп - язык программирования, между прочим паскаль...

@Sead · 29.10.2013, 15:06

Не по теме:

а дошло яп это язык программера-(только не надо бегать за программерами и отрезать им языки:D)

Добавлено через 50 секунд
Крюгер, долго доходит я вштыреный)

@Крюгер · 29.10.2013, 15:15

Sead, а ну эт завсегда хорошо. DekBlack, счас приведу пример скоро

Добавлено через 3 минуты
можно вот так например...

Pascal
1
2
3
4
5
6
7
8
9
10
c , m, i,q,r,z, so:integer;
T :array[1..10]of integer;
 
for i:=1 to 10 do begin T[i]:=random; end;
for i:=1 to 10 do begin if T[i]<c then q:=q+1; end;
 
for i:=1 to 10 do begin if T[i]>c then r:=r+1;
z:=z+T[i]; 
so:=z/r;
end;

@Sead · 29.10.2013, 15:19

Крюгер, хм мб m - это длина массива?
т.е for i:=1 to do m begin {ну и т.д.}
хм а С - это обычное число? тогда всё ваще просто))

@DekBlack · 29.10.2013, 15:31 **[ТС]**

а можно это еще как нибудь в блок-схему перевести? есть программы какие нибудь или сайты?

Добавлено через 11 минут
а это еще можно перевести как-нибудь в блок-схему?

@Крюгер · 29.10.2013, 20:09

Sead, не исключено что так)

@Sead · 30.10.2013, 10:10

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
uses crt;
var t:array[1..25] of real;
i,k,z,m:integer;
c,sr:real;
begin
Randomize;
writeln('Vvedi dlinu massiva');
readln(m);
writeln('Vvedi chilso');
readln(c);
writeln('Massiv');
for i:=1 to m do begin
t[i]:=random(15)-4; {zapolnyaem masssiv randomno}
write(t[i]:5:0);//vivodim massiv
end;
writeln;
for i:=1 to m do begin
if t[i]<c then inc(k) else begin
sr:=sr+t[i];
inc(z);
end;
end;
writeln('Kol-vo elementov kotorie menhe C:= ',k);
writeln('Srednee arifmeticeskoe:= ',sr/z:3:1);
end.

Вобщем вот твоя задача ща блок схему кину

Не по теме:

вчера дела появились прищлось свалить

@Sead · 30.10.2013, 10:12

Вот блок схема

Новые блоги и статьи Все статьи Все блоги /
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .

@DekBlack 0 / 0 / 0 Регистрация: 29.10.2013 Сообщений: 16

	Задание из ВУЗа 29.10.2013, 14:58. Показов 899. Ответов 13 Метки нет (Все метки) Даны С, m и массив T(m). Найти число элементов массива T(m), меньших С, а для элементов, больших С, найти их среднее арифметическое. 0

@Крюгер 40 / 60 / 8 Регистрация: 16.11.2012 Сообщений: 460 Записей в блоге: 7
	29.10.2013, 15:01
	а что трудного в этом? между прочим с минимальными знаниями любого яп, это делается за мин 30, не более Добавлено через 44 секунды и да, С это констатнта? или массив? 0

@Крюгер 40 / 60 / 8 Регистрация: 16.11.2012 Сообщений: 460 Записей в блоге: 7
	29.10.2013, 15:03
	Sead, не, я вот реально не вижу проблемы, чтобы её решить. Ну хочешь ты сделать задание из ВУЗа, тык выучи яп и сделай, не можешь попроси фрилансов в конце концов 0

@DekBlack 0 / 0 / 0 Регистрация: 29.10.2013 Сообщений: 16
	29.10.2013, 15:03 [ТС]
	А это и есть полное задание 0

@Крюгер 40 / 60 / 8 Регистрация: 16.11.2012 Сообщений: 460 Записей в блоге: 7
	29.10.2013, 15:04
	в судя по данной теме, яп - язык программирования, между прочим паскаль... 0

@Sead 66 / 69 / 33 Регистрация: 07.10.2013 Сообщений: 394
	29.10.2013, 15:06
	Не по теме: а дошло яп это язык программера-(только не надо бегать за программерами и отрезать им языки:D) Добавлено через 50 секунд Крюгер, долго доходит я вштыреный) 0

@Sead 66 / 69 / 33 Регистрация: 07.10.2013 Сообщений: 394
	29.10.2013, 15:19
	Крюгер, хм мб m - это длина массива? т.е for i:=1 to do m begin {ну и т.д.} хм а С - это обычное число? тогда всё ваще просто)) 0

@DekBlack 0 / 0 / 0 Регистрация: 29.10.2013 Сообщений: 16
	29.10.2013, 15:31 [ТС]
	а можно это еще как нибудь в блок-схему перевести? есть программы какие нибудь или сайты? Добавлено через 11 минут а это еще можно перевести как-нибудь в блок-схему? 0

@Крюгер 40 / 60 / 8 Регистрация: 16.11.2012 Сообщений: 460 Записей в блоге: 7
	29.10.2013, 20:09
	Sead, не исключено что так) 0

@Sead 66 / 69 / 33 Регистрация: 07.10.2013 Сообщений: 394
	30.10.2013, 10:12
	Вот блок схема Миниатюры 0