LET A -1
GOSUB 5
RETURN
END
PRINT A
RETURN
.