5.3. Листинги с результатами

1)

  GPSSR/PC  V1.127-MAY-2015   21:38  PAGE 1

  1.LST=1.txt

LINEBLOCK

1       SIMULATE

21      FUNCTION   RN$1,C13

30,0/0.1,0.104/0.2,0.222/0.3,0.357/0.4,0.511/0.5,0.693/

40.6,0.915/0.7,1.304/0.8,1.610/0.9,2.303/0.97,3.507/

50.995,5.298/0.999,7

61      TABLE      M$1,100,100,15

71      VARIABLE   X$1+1+X$2*RN$1/1000

82      VARIABLE   (X$3+X$4+X$5)*100/TB$1

93      VARIABLE   X$1-1

104      VARIABLE   X$1+X$2+1

111       GENERATE   ,,,1

122       SPLIT      V$3,ABC,1

133ABC    MARK

144       SEIZE      P$1

155       ADVANCE    X$3,FN$1

166       RELEASE    P$1

177       SEIZE      V$4

188       ADVANCE    X$5

199       ASSIGN     2,V$1

2010       SEIZE      P$2

2111       ADVANCE    X$4

2212       RELEASE    P$2

2313       RELEASE    V$4

2414       TABULATE   1

2515       SAVEVALUE  6-,1

2616       TEST_LE    X$6,0,ABC

2717       SAVEVALUE  7,V$2

2818       TERMINATE  1

29       INITIAL    X$1,9,X$2,4