DATA: v_index TYPE i.
  DATA: v_odd TYPE i.
  DATA: v_string TYPE string.

  DO 9 TIMES.
    WRITE / ''.
    v_index = sy-index.
    v_odd = sy-index mod 2.
    IF v_odd EQ 0.
      v_string = sy-index.
      WRITE v_string.
      DO v_index TIMES.
        v_string = v_index - sy-index.
        IF v_string NE 0. WRITE: '-', v_String. ENDIF.
      ENDDO.
    ELSE.
      DO sy-index TIMES.
        v_string = sy-index.
        IF sy-index > 1. WRITE '-'. ENDIF.
        WRITE v_string.
      ENDDO.
    ENDIF.
  ENDDO.