Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/2: Рейтинг темы: голосов - 2, средняя оценка - 4.50
Casillas1
2 / 2 / 0
Регистрация: 18.04.2013
Сообщений: 199
1

Кто может написать программу нахождения багажа, средний вес одной вещи отличается не более, чем на Т

05.06.2014, 15:38. Просмотров 477. Ответов 7
Метки нет (Все метки)

Помогите написать программу нахождения багажа, средний вес одной вещи отличается не более, чем на Т килограмм от общего среднего веса одной вещи.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
05.06.2014, 15:38
Ответы с готовыми решениями:

Структура: Найти багаж, средний вес одной вещи, в котором отличается не более чем на 0.3 кг от общего среднего веса одной вещи
Помогите с лабой. За ранее спасибо) Багаж пассажира характеризуется количеством вещей и общим...

Файл: найти багаж, средний вес одной вещи в котором отличается не более чем на m кг от общего среднего веса одной вещи
Нужно написать код к задаче. Кто сможет помогите плиз очень нужно. Заранее спасибо....

Тип данных запись: Найти багаж, средний вес одной вещи в котором отличается не более, чем на 0,3 кг от общего среднего веса одной вещи
Найти багаж, средний вес одной вещи в котором отличается не более, чем на 0,3 кг от общего среднего...

Найти багаж, средний вес одной вещи в котором отличается не более чем на 0.3 кг от общего среднего веса вещи
Задача на файл. Багаж пассажира характеризуеся количеством вещей и общим весом вещей. Дан файл f...

7
Пытливый
1548 / 819 / 295
Регистрация: 29.05.2013
Сообщений: 3,885
05.06.2014, 15:59 2
Что-то я даже не пойму условия. Есть средний вес вещи, который считается как сумма весов всех вещей поделенная на их количество. Это в условии задачи называется "общего среднего веса одной вещи". А вот что такое еще и "средний вес одной вещи", я даже и не соображу. Может подразумевается вес одной вещи?
0
Casillas1
2 / 2 / 0
Регистрация: 18.04.2013
Сообщений: 199
05.06.2014, 16:04  [ТС] 3
Цитата Сообщение от Пытливый Посмотреть сообщение
Что-то я даже не пойму условия. Есть средний вес вещи, который считается как сумма весов всех вещей поделенная на их количество. Это в условии задачи называется "общего среднего веса одной вещи". А вот что такое еще и "средний вес одной вещи", я даже и не соображу. Может подразумевается вес одной вещи?
а да точно
0
Пытливый
1548 / 819 / 295
Регистрация: 29.05.2013
Сообщений: 3,885
05.06.2014, 16:28 4
Тогда примерно так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Const
 N = 10;
Var
 Bag: Array[1..N] of Real;
 i: Integer;
 T,Mid: Real;
begin 
 Mid := 0;
 for i := 1 to N 
 do begin
     Bag[i] := Random(10);
     Mid := Mid + Bag[i];
     end;
 Mid := Mid / N;
 T := Random(5);
 for i := 1 to N 
 do if Bag[i] - Mid <= T
     then WriteLn(Bag[i]);
 ReadLn;
end.
1
Casillas1
2 / 2 / 0
Регистрация: 18.04.2013
Сообщений: 199
05.06.2014, 16:41  [ТС] 5
Цитата Сообщение от Пытливый Посмотреть сообщение
Const
*N = 10;
Var
*Bag: Array[1..N] of Real;
*i: Integer;
*T,Mid: Real;
begin
*Mid := 0;
*for i := 1 to N
*do begin
* * *Bag[i] := Random(10);
* * *Mid := Mid + Bag[i];
* * *end;
*Mid := Mid / N;
*T := Random(5);
*for i := 1 to N
*do if Bag[i] - Mid <= T
* * *then WriteLn(Bag[i]);
*ReadLn;
end.
она не работает
0
Миниатюры
Кто может написать программу нахождения багажа, средний вес одной вещи отличается не более, чем на Т  
APALoff
1641 / 1070 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
05.06.2014, 16:54 6
Цитата Сообщение от Casillas1 Посмотреть сообщение
она не работает
Потому что Вы не только не знаете Паскаля, но еще и не умеете копировать код программы.
У Вас на скрине не хватает того, что есть в предложенном Вам коде программы - а именно описание переменной Mid в соответствующем разделе.
0
Casillas1
2 / 2 / 0
Регистрация: 18.04.2013
Сообщений: 199
05.06.2014, 17:01  [ТС] 7
Цитата Сообщение от APALoff Посмотреть сообщение
Потому что Вы не только не знаете Паскаля, но еще и не умеете копировать код программы.
У Вас на скрине не хватает того, что есть в предложенном Вам коде программы - а именно описание переменной Mid в соответствующем разделе.
а что эта прогграма делает?
0
Пытливый
1548 / 819 / 295
Регистрация: 29.05.2013
Сообщений: 3,885
05.06.2014, 17:36 8
Какая прелесть.
Вообще-то выводит список весов согласно задания. Просто я имитирую ввод данных генерацией случайных чисел.
Хотите сделать больше ввода и информативности от всяких сообщений - ради бога.
ПС: Писал прямо тут, без проверки. Алгоритм вроде верен.
0
05.06.2014, 17:36
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.06.2014, 17:36

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Найти багаж, средний вес одной вещи, в котором отличается не более чем на 0.3 кг
Багаж пассажира характеризуется количеством вещей и общим весом вещей. Сведения о багаже каждого...

Найти багаж, средний вес одной вещи в котором отличается не более чем на m кг от общего среднего веса одной
uses Crt; type bagaz=record kol:byte; ves:real; end; var bg:bagaz; ...

Найти багаж, средний вес одной вещи в котором отличается не более чем на m кг от общего
Доброе время суток, напишите пожалуйста код для решения задачи. Багаж пассажира характеризуется...

Найти всех пассажиров, у которых средний вес одной вещи отличается не более, чем на 0,5 кг от общего
составить программу по теме Записи Даны сведения о багаже пассажиров: фамилия пассажира,...


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

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

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