n = 123 write(6,100) n 100 format(1x,i5) stop end