DECLARE SUB A(N) DECLARE SUB B(N) SUB A(N) IF N MOD 3 = 0 THEN B(N-3) ELSE B(N+2) ENDIF END SUB SUB B(N) PRINT "@" IF N > 0 THEN A(N-1) END SUB