| 查看: 474 | 回复: 0 | |||
[交流]
FORTRAN
|
|
DO I=1,20 A=COS(PI*(I-1)/(L1-1)) B=SIN(PI*(I-1)/(L1-1)) YL= (6911667029776107.*(10975*B) + 31974*((1172861051219541491712.*A**2)/306935613347307285025.+(250000*B**2)/47961)**(1/2)))/(16*(26999642716039544832.*A**2 + 35998265780083890625.*B**2)) write(8,*) A,B,YL END DO 想请问一下为什么最后输出的YL结果是错误的 |
» 猜你喜欢
散金币祈福
已经有186人回复
求助,如何提取ELK的rt-TDDFT在某一时刻的自旋密度分布和电子密度分布
已经有1人回复
物理学I论文润色/翻译怎么收费?
已经有88人回复
澳门大学IAPME李海峰教授常年招收博士研究生
已经有0人回复
澳门大学IAPME李海峰教授常年招收博士研究生
已经有0人回复
澳门大学IAPME李海峰教授常年招收博士研究生
已经有0人回复
深圳大学应用技术学院招聘凝聚态物理博士后
已经有114人回复
深圳大学2027级光电信息工程/物理学研究生推免
已经有70人回复
求助中医院临床中医中标的青年标书学习,谢谢
已经有4人回复
浙大物院表面物理课题组长期招收普博及直博学生
已经有257人回复
【征稿】Springer Nature热电专题 Discover Materials / Discover Chemistry
已经有39人回复










回复此楼