powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Программирование [игнор отключен] [закрыт для гостей] / GPSS Word
2 сообщений из 2, страница 1 из 1
GPSS Word
    #37286805
LEGOLAZ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Помогите данную программу переделать на С + + или на С #! Очень надо! Заранее спасибо!


SVE EQU 1
BWE EQU 2
BWE BVARIABLE F1+F2
SVE STORAGE 300 ; Ємність складу
INITIAL X$BEL3,48
EXPON FUNCTION RN1, C24 ; експоненціальний закон розподілу
0,0/.1,.104/.2,.222/.3,.355/
.4,.509/.5,.69.6,.915/.7,1.2/
.75,1.38/.8,1.6/.84,1.83
.88,2.12/.9,2.3/.92,2.52/
.94,2.81/.95,2.99.96,3.2/
.97,3.5/.98,3.9/.99,4.6/
.995,5.3.998,6.2/.999,7/.9997,8
TAB1 TABLE SR1,50,3,10
GENERATE 1,,,1
FUNAVAIL 1 ;Установка початкового стану платформ
FUNAVAIL 2
TERMINATE
GENERATE 14400,,4800 ; Подача потягу
CAR LOGIC S 1
SEIZE 3
FAVAIL 1 ;Платформи відкриті для завантаження
FAVAIL 2
ADVANCE 1
TEST E BV$BWE,0
LOGIC R 1
RELEASE 3
FUNAVAIL 1 ;Платформи не доступні для завантаження
FUNAVAIL 2
SAVEVALUE BEL1+,1 ; Число завантажених пар платформ
TEST NE X$BEL1, 5, KON
ADVANCE 200 ; Перерозподіл платформ
TRANSFER, CAR ; Завантаження наступної пари
KON SAVEVALUE BEL1,0
TERMINATE 1
GENERATE 150 ; Випуск верстатів з конвеєра
ADVANCE 250, 50 ;Перегін верстатів на склад TABULATE TAB1
ENTER 1 ; Надходження верстатів на склад
GATE LS 1
SAVEVALUEBEL2+, 1
TEST E X$BEL2, X$BEL3, POGR
LOGIC R 1
SAVEVALUE BEL2, 0
POGR LOGIC I 2
GATE LR 2, RAZ
ASSIGN 1, 1
RAZ ASSIGN 1+, 1
SEIZE P1 ; Заняття платформи
LEAVE 1
ADVANCE 130, FN$EXPON ; Завантаження в потяг
RELEASE P1 ; Звільнення платформи
TERMINATE
START 30 ; Моделювання системи протягом місяця
...
Рейтинг: 0 / 0
GPSS Word
    #37286905
Фотография MasterZiv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
On 31.05.2011 12:21, LEGOLAZ wrote:
> Помогите данную программу переделать на С + + или на С #! Очень надо! Заранее
> спасибо!

Это не программа. Это -- модель.

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Программирование [игнор отключен] [закрыт для гостей] / GPSS Word
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]