Thank you to both for replying;
Indeed I was thinking of a loop, but would not really know how to set it correctly.
There are specifically two GOTO statements, one sending me further down (line 030) with respect to where it is called, and one further up (line 013);
I quote a little more of the code and see if you want to help:
Code:
for (i = j + 1; i<=3; i++){
013 m := m + 1
014 if( A[m] == 0){
015 A[m] = I[i]
016 GOTO 030
017 }
018 if( A[m] < I[i] ){
019 GOTO 013
020 }
...
...
030 continue;
...
...