)

Statement

10 FORMAT(A)
WRITE(*, 10)

Output