c text console output channel = 6 ! 100 format(1x,"Hi Adam!") write(6,100) stop end