LET A = 5
    LET B = 3
    PRINT "A = ", A, ",  B = ", B
    PRINT ""
    PRINT A," + ",B," = ", A+B
    PRINT A," - ",B," = ", A-B
    PRINT A," * ",B," = ", A*B
    PRINT A," / ",B," = ", A/B
    PRINT A," % ",B," = ", A-(A/B)*B
    REM Exponent calculation
    LET X = 1
    LET E = 0
10  IF X >= B THEN GOTO 30
    LET T = E
    IF E < A THEN LET E = A*A
    IF T < A THEN GOTO 20
    IF E >= A THEN LET E = E*A
20  LET X = X+1
    GOTO 10
30  PRINT A," ^ ",B," = ", E
    END