一个有关Fortran程序的问题,
题目
一个有关Fortran程序的问题,
部分程序
1001 FORMAT(4I5)
1002 FORMAT(6X,'TOTAL NUMBER OF FILMENTS' 15/
& 24X,'NOODES=',I5/25X,'LOADS-',I5/22X,'FIXITIES'I5)
1003 FORMAT(/5X,'ELEMENT DEFINITIONS'/
& 5X,'ELEMENT',2X,'NOOD1',2X,'NOOD2',2N/)
1004 FORMAT(3I5)
1005 FORMAT(5X,I5,3 2X,I5)
1006 FORMAT(/5X,'NOODL COORL IHATES'/
& 5X,'NOOD',6X,1HX,9X,IHY/)
1007 FORMAT(T5,2F10.8)
1008 FORMAT(5X,2F10.3)
1009 FORMAT(/5X,'APPLIED LOADS AND FIXITIES'/
& 5X,'NOOD',5X,'APPLIED LOADS',8X,'FIXITIES'/)
错误是
C:\vf -1\1.for(117) :Error:This character is not valid in a format list.[H]
1006 FORMAT(/5X,'NOODL COORL IHATES'/
^
C:\vf -1\1.for(117) :Error:This character is not valid in a format list.[Y]
1006 FORMAT(/5X,'NOODL COORL IHATES'/
^
C:\vf -1\1.for(113) :Error:This character is not valid in a format list.[N]
1003 FORMAT(/5X,'ELEMENT DEFINITIONS'/
答案
问题1:
1006 FORMAT(/5X,'NOODL COORL IHATES'/
& 5X,'NOOD',6X,1HX,9X,IHY/)
这里的 IHY 是否应该是 1HY ?
问题2:
1003 FORMAT(/5X,'ELEMENT DEFINITIONS'/
& 5X,'ELEMENT',2X,'NOOD1',2X,'NOOD2',2N/)
这里的 2N 非法,Fortran里没有 N 编辑符.是否应该是 2X ?
PS:建议不要使用 H 编辑符,在新语法里,这个编辑符被弃用了.
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 英语翻译
- 我已知道元音字母“ear”,“ere”在单词中的读音/a/,并能说出、写出带有/a/发音的相关单词.我还能用这些词中的部分组成一句话.
- 通过实验我们了望了光的反射规律与角的关系,即().当入射光远离法线时,反射光()
- 密度单位:克/立方厘米和千克/立方米,哪个大
- 人有卖骏马者,比三日立市,人莫之知.往见伯乐,曰:“臣有骏马欲卖之,比三日立于市,人莫与言.愿子还而视之,去而顾之,臣请献一朝之贾.” 伯乐乃还而视之,去而顾之.一旦而马价十倍.
- 为什么纤维素不能被消化?
- 小强前几次数学平均成绩是84分,这次要考100分,才能使平均成绩达到86分.这一次是第( )次考试. A.7 B.8 C.9 D.10
- 平面3x-ky-3z+16=0与曲面3x^2+y^2+z^2=16相切,求k
- 已知所有菱形组成的集合为A,所有矩形组成的集合为B,求A交于B
- 如图所示中国选手何雯娜在2008年北京奥运会女子蹦床项目的比赛中摘取金牌,已知何雯娜的体重为四十九千克,射它从三点二米高处自由下落后于蹦床的作用时间为一点二秒,离开蹦床后上升的高度为五米,求她对蹦床的