fork download
copy 
  1.  
  2. ; Определение таблиц и переменных
  3. vrema TABLE M1,50,50,20
  4. kol STORAGE 1
  5. verojt STORAGE 1
  6. ; Блок GOtk
  7. GENERATE (Erlang(4,75)) ; Специальный эрланговский закон Ср. 75 Кол. фаз 4
  8. TRANSFER ,TOBUF
  9. ; Блок GT
  10. GENERATE 100,20 ; Равномерный закон
  11. TRANSFER ,TOBUF
  12. ; Блок BUF
  13. TOBUF QUEUE BUF
  14. ENTER BUF
  15. DEPART BUF
  16. TEST LE P1,1,TOPK ; Проверка на "Неогран. длины"
  17. TRANSFER ,VOSST
  18. ; Блок PK
  19. TOPK SEIZE PK
  20. ADVANCE (Exponential(1,0,95)) ; Экспоненциальный закон Ср.95
  21. LEAVE PK
  22. TEST G P2,120,FAIL ; Проверка на превышение 120 единиц времени
  23. TERMINATE
  24. ; Блок Vosst
  25. VOSST ADVANCE(Normal(300,60)) ; Нормальный закон Ср. 300 Ст. откл. 60
  26. TERMINATE
  27. ; Обработка отказов
  28. FAIL SAVEVALUE kol+,1
  29. TEST L X$kol,12,konec
  30. TERMINATE
  31. ; Завершение моделирования
  32. konec SAVEVALUE verojt,(N$FAIL/(N$FAIL+N$TOPK))
  33. TERMINATE 1
  34. START 100
  35.  
  36.  
  37.  
  38.  
Success #stdin #stdout #stderr 0.01s 5320KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
Error: near line 2: near "Определение": syntax error
https://ideone.com/PI2klM
language:
SQLite (sqlite 3.27.2)
created:
3 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!