我的程序是在Windows下写的,最近不得已移植到Linux环境下结果无法正常输出(Windows下输出正常),一个下午没能找到原因在哪.
不知有没有能帮忙解答,谢谢.
下附输出我的程序:
CHARACTER PART1,PART2,PART0
CHARACTER*9 OUT
        N2=NYEAR-INT(NYEAR/10)*10
        N1=(NYEAR-INT(NYEAR/100)*100)/10
        N0=(NYEAR-INT(NYEAR/1000)*1000)/100
        PART0=CHAR(48+N0)
        PART1=CHAR(48+N1)
        PART2=CHAR(48+N2)
        OUT='M'//PART0//PART1//PART2//'.DAT'
        OPEN (100,FILE=OUT)
       WRITE(100,*) H