>>281
$を付けると改行しません．
HP FORTRANだけの独自拡張だと思っていたのですが，
Linux上のf2c,g77-3.2どちらでも使用できました．
g77-2.95は試していません．

program test
implicit none
integer*2 i

write(6,'("Input number: ",$)')
read(5,'(i2)') i
write(6,'("The number is ",i2)') i

stop
end