This preview shows page 1. Sign up to view the full content.
Unformatted text preview: WRITE(*,*) "The height is less than 0.005 and will not bounce" EXIT END IF WRITE(*,*) "The height after bounce#", bounce, " ",height height=height*percent/100 bounce=bounce+1 END DO END PROGRAM part1b...
View Full Document
- Spring '10