FORTRAN 90 的format語句怎么用?
FORTRAN 90 的format語句怎么用?
這是我的代碼:
print "(26x,2x,2x,2x,'英語')"
100 format(輸入第 位同學4門課的成績:',t7,i1\)
write (*,100) 1
read (*,'(f4.1,2x,f4.1,2x,f4.1,2x,f4.1)'),a1,a2,a3,a4
write (*,100) 2
read(*,'(f4.1,2x,f4.1,2x,f4.1,2x,f4.1)') b1,b2,b3,b4
write (*,100) 3
read(*,'(f4.1,2x,f4.1,2x,f4.1,2x,f4.1)') c1,c2,c3,c4
avera1=.25*(a1+a2+a3+a4)
avera2=.25*(b1+b2+b3+b4)
avera3=.25*(c1+c2+c3+c4)
print "(15x,2x,2x,2x,'英語',2x,'總成績',2x,'平均成績')"
print "('第1位同學成績:',f4.1,2x,f4.1,2x,f4.1,2x,f4.1,2x,f5.1,x,f4.1)",a1,a2,a3,a4,4*avera1,avera1
end
format語句不應該這么用嗎?怎么有語法錯……
這是我的代碼:
print "(26x,2x,2x,2x,'英語')"
100 format(輸入第 位同學4門課的成績:',t7,i1\)
write (*,100) 1
read (*,'(f4.1,2x,f4.1,2x,f4.1,2x,f4.1)'),a1,a2,a3,a4
write (*,100) 2
read(*,'(f4.1,2x,f4.1,2x,f4.1,2x,f4.1)') b1,b2,b3,b4
write (*,100) 3
read(*,'(f4.1,2x,f4.1,2x,f4.1,2x,f4.1)') c1,c2,c3,c4
avera1=.25*(a1+a2+a3+a4)
avera2=.25*(b1+b2+b3+b4)
avera3=.25*(c1+c2+c3+c4)
print "(15x,2x,2x,2x,'英語',2x,'總成績',2x,'平均成績')"
print "('第1位同學成績:',f4.1,2x,f4.1,2x,f4.1,2x,f4.1,2x,f5.1,x,f4.1)",a1,a2,a3,a4,4*avera1,avera1
end
format語句不應該這么用嗎?怎么有語法錯……
其他人氣:147 ℃時間:2020-07-13 05:44:13
優(yōu)質解答
100 format ( ' 輸入第' ,i1, '位同學4門課的成績:'\)的確用這個就對了,但是為什么我的不對?……還有為什么標號一般是100,200的,用1,2也可以啊?謝謝!你的 100 format(輸入第 位同學4門課的成績:',t7,i1\) 中的文字(字符)沒有用引號引起來,還有t7是什么含義?標號一般是100,200的,是一種習慣的用法,用1,2當然也可以。
我來回答
類似推薦
- fortran語句 read(45,'(i4,f12.5,1p6e16.7)')是什么意思呢?后面這些format是什么呢?好長啊
- fortran的3個簡單語句,有誰會fortran的解釋下
- fortran 語句
- 軍蟻是不是最厲害的螞蟻
- It's quite n_____ for a person to refuse the offer of help from strangers.
- 在金屬中最善于傳熱的是---?
- 1、2、5、13、34、()括號里是多少找規(guī)律,🈶什么規(guī)律
- 水受到地球引力的作用,從高處到低處,這一現象中 ,受力物體是什么?施力物體是什么?
- 追加100分,數學
- 亞硝酸鈉溶于水的反應化學方程式?
- 請問去動物園怎么走的英文翻譯是什么
- 學校圖書室去年有四百八十萬冊圖書今年圖書數比去年增加了三分之一現在學校圖
猜你喜歡
- 1Is this chair made ( ) wood?
- 2雞兔同籠,兔的只數是雞的3倍,共有腳280只.雞、兔各有多少只?
- 3提示的近義詞是什么
- 4為什么“泰山”是“TaiShan Mountain”而黃山卻是“Huang Mountain”呢?
- 5"愛蓮說“是誰寫的?
- 6有一根長方體木料體積是540立方分米,它的截面面積是20平方分米,這根木料的長應是_米.
- 7如圖,小亮從A點出發(fā)前進10m,向右轉15°,再前進10m,又向右轉15°,這樣一直走下去,他第一次回到出發(fā)點A時,一共走了米數是( ?。?A.120 B.150 C.240 D.360
- 8電功率的公式:P=W/t=IUt/t=IU讀作?
- 9“自相矛盾”這個成語告誡人們什么道理?
- 10已知某件事每隔兩分鐘可能會發(fā)生一次,發(fā)生概率為15%,
- 11(2009?承德縣模擬)(甲、乙均不為0)甲數的14等于乙數的16,甲數的15和乙數的17比較,( ) A.甲數的15大 B.乙數的17大 C.可能是甲數的15大,也可能是乙數的17大 D.一樣大
- 12一道關于人數的數學題