程序运行后，出现如下结果：forrtl：several（61）：format、variable-typemismatch，unit6，file conout.请问如何改正。