1 2 3 4 5 6 7 8
program test1 implicit none integer :: i i = 5+5 print *, i print *, "Fortran test code executed" print *, "TESTS PASSED" end program