RosettaCodeData/Task/Compile-time-calculation/Fortran/compile-time-calculation.f

9 lines
173 B
FortranFixed
Raw Permalink Normal View History

2013-04-10 16:57:12 -07:00
program test
implicit none
integer,parameter :: t = 10*9*8*7*6*5*4*3*2 !computed at compile time
write(*,*) t !write the value the console.
end program test