real Example

10    COMPLEX C
20    C=CMPLX(5,7)
30    PRINT "The real part of C is";REAL(C)
40    INTEGER A
50    A=7
60    PRINT INT(A*PI)
70    PRINT REAL(A*PI)
80    END