//JOB(ERCC07,STEPHENS,T=200,L=10000)
//OPTIONS(QUOTES,OPT)
//ALGOL
'COMMENT'
                         ***************
                         *             *
                         *   ALGG013   *
                         *             *
                         ***************
;
 'BEGIN'
 'PROCEDURE'CPUTIM(T);
 'REAL' T;
   T:=CPUTIME;
 'INTEGER' I,J,K,L;
 'REAL'T;
 CPUTIM(T);
   I:=-100; J:=0;  K:=100;
 'FOR'L:=1'STEP'1'UNTIL'1000'DO'
 'BEGIN'
        'GOTO' L200;
 L100: 'IF'I<0'THEN''GOTO'L101'ELSE''IF'I=0'THEN''GOTO'L200
        'ELSE''GOTO'L201;
 L101: 'IF'J<0'THEN''GOTO'L200'ELSE''IF'J=0'THEN''GOTO'L102
        'ELSE''GOTO'L201;
 L102: 'IF'K<0'THEN''GOTO'L200'ELSE''IF'K=0'THEN''GOTO'L201
        'ELSE''GOTO'L103;
 L103: 'IF'I<0'THEN''GOTO'L104'ELSE''IF'I=0'THEN''GOTO'L200
        'ELSE''GOTO'L200;
 L104: 'IF'J<0'THEN''GOTO'L200'ELSE''IF'J=0'THEN''GOTO'L105
        'ELSE''GOTO'L200;
 L105: 'IF'K<0'THEN''GOTO'L200'ELSE''IF'K=0'THEN''GOTO'L200
        'ELSE''GOTO'L106;
 L106: 'IF'I<0'THEN''GOTO'L107'ELSE''IF'I=0'THEN''GOTO'L107
        'ELSE''GOTO'L200;
 L107: 'IF'J<0'THEN''GOTO'L200'ELSE''IF'J=0'THEN''GOTO'L108
        'ELSE''GOTO'L108;
 L108: 'IF'K<0'THEN''GOTO'L109'ELSE''IF'K=0'THEN''GOTO'L200
        'ELSE''GOTO'L109;
 L109: 'IF'I<0'THEN''GOTO'L110'ELSE''IF'I=0'THEN''GOTO'L200
        'ELSE''GOTO'L110;
 L110: 'IF'J<0'THEN''GOTO'L111'ELSE''IF'J=0'THEN''GOTO'L111
        'ELSE''GOTO'L200;
 L111: 'IF'K<0'THEN''GOTO'L200'ELSE''IF'K=0'THEN''GOTO'L112
        'ELSE''GOTO'L112;
 L112:
        'GOTO' L300;
 L200: 'IF'I<0'THEN''GOTO'L201'ELSE''IF'I=0'THEN''GOTO'L100
        'ELSE''GOTO'L101;
 L202: 'IF'K<0'THEN''GOTO'L100'ELSE''IF'K=0'THEN''GOTO'L101
        'ELSE''GOTO'L203;
 L201: 'IF'J<0'THEN''GOTO'L100'ELSE''IF'J=0'THEN''GOTO'L202
        'ELSE''GOTO'L101;
 L203: 'IF'I<0'THEN''GOTO'L204'ELSE''IF'I=0'THEN''GOTO'L100
        'ELSE''GOTO'L100;
 L205: 'IF'K<0'THEN''GOTO'L100'ELSE''IF'K=0'THEN''GOTO'L100
        'ELSE''GOTO'L206;
 L204: 'IF'J<0'THEN''GOTO'L100'ELSE''IF'J=0'THEN''GOTO'L205
        'ELSE''GOTO'L100;
 L206: 'IF'I<0'THEN''GOTO'L207'ELSE''IF'I=0'THEN''GOTO'L207
        'ELSE''GOTO'L100;
 L208: 'IF'K<0'THEN''GOTO'L209'ELSE''IF'K=0'THEN''GOTO'L100
        'ELSE''GOTO'L209;
 L207: 'IF'J<0'THEN''GOTO'L100'ELSE''IF'J=0'THEN''GOTO'L208
        'ELSE''GOTO'L208;
 L209: 'IF'I<0'THEN''GOTO'L210'ELSE''IF'I=0'THEN''GOTO'L100
        'ELSE''GOTO'L210;
 L211: 'IF'K<0'THEN''GOTO'L100'ELSE''IF'K=0'THEN''GOTO'L212
        'ELSE''GOTO'L212;
 L210: 'IF'J<0'THEN''GOTO'L211'ELSE''IF'J=0'THEN''GOTO'L211
        'ELSE''GOTO'L100;
 L212:
        'GOTO' L100;
 L300:;
 L:=L;
 'END';
 CPUTIM(T);
 OUTPUT(T);
 'END'
//RUN