12 lines
260 B
FortranFixed
12 lines
260 B
FortranFixed
|
program IntegerLiteral
|
||
|
|
|
||
|
|
implicit none
|
||
|
|
integer, parameter :: dec = 727
|
||
|
|
integer, parameter :: hex = Z'2d7'
|
||
|
|
integer, parameter :: oct = O'1327'
|
||
|
|
integer, parameter :: bin = B'1011010111'
|
||
|
|
|
||
|
|
print *, dec, hex, oct, bin
|
||
|
|
|
||
|
|
end program IntegerLiteral
|