RosettaCodeData/Task/Character-codes/Fortran/character-codes.f
2023-07-01 13:44:08 -04:00

2 lines
66 B
Fortran

WRITE(*,*) ACHAR(97), IACHAR("a")
WRITE(*,*) CHAR(97), ICHAR("a")