! John Kerl ! 1998 program hello do i=1, 10 write(*,*) 'Hello!' end do end program hello