IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Парикмахерская, программа
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 22
Пол: Мужской

Репутация: -  0  +


Парикмахерская. Для каждого посетителя парикмахерской (с одним мастером) известны следующие величины: t – момент его прихода и τ – продолжительность его обслуживания. Сколько клиентов обслужит мастер за смену продолжительностью Т? Сколько рабочего времени он потратит на обслуживание?
Момент прихода и продолжительность обслуживания вводятся пользователем..
Помогите,плизз,если кто может..
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Новичок
*

Группа: Пользователи
Сообщений: 22
Пол: Мужской

Репутация: -  0  +


Цитата
Точнее: Приложение 4, П4.3.2

У нас по приложению 4-Типы данных!
не могу найти wacko.gif

Я вот тут описываю программу..ее надо описать вместе с операторами..

Цитата
Программа состоит из 55 строчек. Язык, используемый программой – русский.
В тексте программы использовались такие операторы, как:
WriteLn;
While;
For;
If; else;

В разделе var мы объявляем время прихода каждого клиента, время его обслуживания, а также общее число клиентов.
Операторами TOpen; и TClose; мы обьявили время открытия и время закрытия парикмахерской.


Подскажите,пожалуйста,как бы покультурней описать While?может быть еще что-то надо описать?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Уникум
*******

Группа: Пользователи
Сообщений: 6 823
Пол: Мужской
Реальное имя: Лопáрь (Андрей)

Репутация: -  159  +


> У нас по приложению 4-Типы данных!
Это Глава 4 - Типы данных. Смотри Приложения внизу..

> Я вот тут описываю программу..ее надо описать вместе с операторами..
> Программа состоит из 55 строчек. Язык, используемый программой – русский.
Язык интерфейса программы - русский (латиница)

> В тексте программы использовались такие операторы, как:
> WriteLn;
> While;
> For;
> If; else;
Убери ";", это не есть часть оператора. А внутри оператора "if ... then ... else" они просто являются ошибкой (проверь, попробуй поставить ";" перед else).

> В разделе var мы объявляем время прихода каждого клиента,
Мы объявляем переменные для хранения времени ....

> Операторами TOpen; и TClose; мы обьявили время открытия и
Это не операторы. Это переменные, которые мы завели для хранения времени открытия и закрытия парикмахерской.

> как бы покультурней описать While?может быть еще что-то надо описать?
Цикл while осуществляет регистрацию клиентов по мере их поступления, присваивая каждому клиенту его номер и занося в массивы время прихода и время, необходимое для обслуживания каждого клиента. Выход из цикла осуществляется по признаку конца файла ввода (Ctrl-Z для файла типа text).

Цикл for является централной конструкцией в данной программе. Он осуществляет моделирование работы мастера, состоящее в вызове мастером клиентов по очереди (по мере освобождения мастера либо по мере поступления клиентов, в зависимости от того, что наступает раньше). Моделирование осуществляется посредством вычисления времени начала (переменная t) и конца (переменная t1) сеанса. При этом если оставшегося рабочего времени недостаточно для обслуживания вызываемого клиента, то ему сообщается о невозможности обслуживания, после чего осуществляется переход к следующему по очереди клиенту. Цикл заканчивается по окончании обслуживания (либо сообщении об отказе в сервисе) всех клиентов. В процессе цикла суммируется общее рабочее время мастера (переменная tWork), а также выводится информауия о предпринятом действии (обслуживание с временем начала и конца, отказ). По завершении цикла выводится суммарное общее число обслуженных (то есть тех, кому не было отказано в сервисе) клиентов и полное рабочее время мастера.

Вот, примерно так, думаю.. smile.gif


--------------------
я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Дон   Парикмахерская   21.11.2006 2:21
lapp   Задачи на моделирование встречаются не очень часто…   21.11.2006 10:49
Дон   Я в паскале очень слаб...он у нас идет первый го…   21.11.2006 17:46
lapp   сегодня-завтра сбегаю за учебником по паскалю и на…   22.11.2006 6:21
lapp   Дон, я понял, что надо не так резко. Начнем с само…   23.11.2006 20:10
Дон   Это мы обьявляем две переменные.Время открытия и…   23.11.2006 22:28
lapp   > Потом мы взяли эти переменные и присвоили им …   24.11.2006 7:46
Дон   ReadLn считывает данные с экрана.От read отличае…   25.11.2006 1:44
lapp   Привет! > ReadLn считывает данные с экрана.…   25.11.2006 15:13
Дон   Попробовал. Да,когда ReadLn отсутствует,то прогр…   25.11.2006 20:58
lapp   Тут ошибку выдал...">" expected.Закл…   26.11.2006 5:09
Дон   Все отлично работает))) { for Don, BarberShop…   26.11.2006 19:07
lapp   И..как задавать как он хочет стричься?допустим у …   27.11.2006 13:17
Дон   честно говоря не понял...а смысл?если пришел оди…   29.11.2006 1:53
lapp   > честно говоря не понял...а смысл? внимательно…   29.11.2006 6:42
lapp   Дон, ты сдался? надоело?.. Еще одна зарубка в ря…   1.12.2006 9:53
Дон   Вот уж фигушки... Ничего я не сдался..стыдно прост…   1.12.2006 18:49
lapp   Вот уж фигушки... Ничего я не сдался.. И правиль…   2.12.2006 3:48
Дон   В принципе да..курсовую через три дня сдавать) …   2.12.2006 23:40
lapp   Все работает и пока что все ясно! Это очень х…   6.12.2006 8:04
Дон   Мда..все-таки комментарии вещь хорошая...без них б…   7.12.2006 1:32
Lapp   А как вывести в начале программы большими белыми …   7.12.2006 11:39
Дон   Можно в принципе и на английсском...я просто хот…   7.12.2006 12:31
Lapp   Можно в принципе и на английсском...я просто хоте…   7.12.2006 13:08
Дон   И цвет фона поменял и текста,только... Нужно что…   8.12.2006 2:24
Lapp   [code]begin TextColor(2); Write(…   8.12.2006 6:49
Дон   Вот какая фигня...текст-то он окрасил... Только …   9.12.2006 1:25
Lapp   когда я задаю Uses Crt; в начале программы,CTRL-Z…   9.12.2006 15:35
Гость   Зашел,почитал...не разобрался :unsure: мы должн…   9.12.2006 17:20
Lapp   Зашел,почитал...не разобрался :unsure: Такое та…   9.12.2006 17:28
Дон   неа..признаться честно,не нашел.. CheckEof:Bool…   10.12.2006 1:27
Lapp   > неа..признаться честно,не нашел.. Но теперь-т…   10.12.2006 9:08
Дон   нет..признаться,с ними я не знаком.. В раздел…   10.12.2006 20:00
Lapp   В разделе CRT?Нету!я даже поиск давал по глав…   11.12.2006 9:12
Дон   У нас по приложению 4-Типы данных! не могу на…   12.12.2006 4:08
Lapp   > У нас по приложению 4-Типы данных! Это Гл…   12.12.2006 6:16
Дон   Усе..найдено))) спасибо большое :give_rose: …   13.12.2006 2:35
Lapp   > Усе..найдено))) Вывод: внимательнее относись …   13.12.2006 8:35
Дон   Прошелся по программе...возникло несколько вопросо…   14.12.2006 21:29
Lapp   > Прошелся по программе...возникло несколько во…   15.12.2006 8:42
Дон   А то... Я почему постоянно переспрашиваю..глупос…   16.12.2006 20:51


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 5.05.2024 8:05
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name