![]() |
|
![]() ![]() ![]() |
|
nitrak |
|
|||
Новичок Профиль Группа: Участник Сообщений: 18 Регистрация: 25.12.2006 Репутация: нет Всего: нет |
вот исходник
20 GENERATE 300,FN$XPDIS ;Create next customer. 25 TEST L Q$BARBER,8,OUT 30 QUEUE BARBER ;Begin queue time. 40 SEIZE BARBER ;Own or wait for barber. 50 DEPART BARBER ;End queue time. 60 ADVANCE 400,FN$XPDIS ;Haircut takes a few minutes. 69 RELEASE BARBER ;Haircut done. Give up the barber. 80 TERMINATE 1 ;Customer leaves. 84 OUT TERMINATE 1 расчитать верятноть появления сразу двух транзактов |
|||
|
||||
![]() ![]() ![]() |
Добро пожаловать в раздел "Другие языки" форума Vingrad! | |
|
Раздел посвящён различным языкам программирования, для которых (в силу невысокой популярности) нет отдельного раздела (GPSS, Lua, MATLAB, Ada, Forth, Smalltalk, Tcl, REXX, AWK и др.)
Приятного времяпрепровождения! С уважением, Void, kemiisto . |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Другие языки | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |