| 查看: 577 | 回复: 1 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
xiaobear20金虫 (小有名气)
(⊙o⊙)…
|
[求助]
FORTRAN新手 求助一个运行结果问题
|
|
|
我有一个有关一维数组运算的小程序，定义没有问题，没有编译错误，其计算公式为：DO J=119,2,-1 W(J)=(A(J)-W(J+1))/C(J) ENDDO A(J) C(J) 如下 0.0000000028 0.0432152076 0.0000000080 0.4230034067 0.0000000200 0.0675112414 0.0000000503 0.3152820300 0.0000000917 0.0932565326 0.0000001837 0.2671521899 0.0000002958 0.1200595684 0.0000005230 0.2461530634 0.0000007846 0.1487013278 0.0000012550 0.2423849710 0.0000017481 0.1809267587 0.0000024987 0.2513632934 0.0000031507 0.2161753841 0.0000039613 0.2670218809 0.0000045009 0.2493410692 0.0000050727 0.2835216641 0.0000053664 0.2768993396 0.0000056714 0.2996388635 0.0000058121 0.3000725200 0.0000059838 0.3164350571 0.0000060907 0.3213782054 0.0000062401 0.3347372825 0.0000063807 0.3426027479 0.0000065673 0.3548846632 0.0000067743 0.3647554643 0.0000070300 0.3770046717 0.0000073234 0.3883991751 0.0000076706 0.4011818986 0.0000080693 0.4138823202 0.0000085310 0.4275220101 0.0000090589 0.4414660371 0.0000096638 0.4561730072 0.0000103536 0.4713921106 0.0000111404 0.4873352069 0.0000120369 0.5039246029 0.0000130589 0.5212726233 0.0000142242 0.5393813747 0.0000155544 0.5583309489 0.0000170745 0.5781656441 0.0000188141 0.5989652814 0.0000208079 0.6208049285 0.0000230973 0.6437817216 0.0000257305 0.6680029769 0.0000273849 0.6628940941 0.0000306438 0.6626951808 0.0000380087 0.6870547624 0.0000495610 0.7177898795 0.0000654069 0.7478146162 0.0000866672 0.7814245158 0.0001147456 0.8159773834 0.0001526284 0.8557560189 0.0002037946 0.8995648086 0.0002706431 0.9414250930 0.0003573056 0.9832661450 0.0004705587 1.0281051767 0.0006188167 1.0756054185 0.0008131309 1.1263346082 0.0010678530 1.1805121143 0.0014019227 1.2385922053 0.0018403161 1.3010228767 0.0024161538 1.3683727946 0.0031734977 1.4413064539 0.0041712486 1.5206316703 0.0054885465 1.6073300283 0.0072323688 1.7026109212 0.0095483216 1.8079801890 0.0126361789 1.9253379478 0.0167725956 2.0571169506 0.0223448885 2.2064830382 0.0299023241 2.3776332103 0.0402359135 2.5762517975 0.0545061448 2.8102285381 0.0744547118 3.0908369091 0.1027705921 3.4347546484 0.1437565742 3.8677185624 0.2046245357 4.4316008666 0.2982323801 5.1993308242 0.4495469896 6.3100936302 0.7134651468 8.0663641831 1.2368908524 11.2719411417 2.5838112047 19.0023300152 10.7484044968 63.9083801926 -9.3378721564 -45.0076484338 -4.1869272658 -16.4211800200 -3.1106817830 -9.9797792711 -2.7062429896 -7.1531200579 -2.5388922556 -5.5817548104 -2.4833009360 -4.5975846161 -2.4875280483 -3.9395479891 -2.5238165909 -3.4853205644 -2.5742890861 -3.1704471578 -2.6265872707 -2.9579728581 -2.6732473002 -2.8251790778 -2.7123579058 -2.7571589913 -2.7478353300 -2.7435520687 -2.7882302604 -2.7769239332 -2.8441118800 -2.8520292593 -2.9252254308 -2.9654855651 -3.0387939926 -3.1155714012 -3.1894202876 -3.3020276919 -3.3800204749 -3.5258530083 -3.6129352439 -3.7891221094 -3.8907191643 -4.0948493767 -4.2165457132 -4.4469012916 -4.5943662656 -4.8499518224 -5.0289626739 -5.3094720218 -5.5259723489 -5.8317462993 -6.0919176167 -6.4239098779 -6.7342487418 -7.0940037672 -7.4614021649 -7.8510449111 -8.2828734203 -8.7051100785 -9.2093039133 -9.6674326601 -10.2525808956 -10.7505119276 -11.4259502114 -11.9682345699 -12.7441415872 -13.3360084897 -14.2235063967 -14.8709089601 -15.8275695484 -16.5505112209 -2.1155865359 -2.0480184438 W(120)=1 我的问题是从数据上看 ，数组C总是大于数组A的，W的值应该很小才对，而且从119到2逐渐递减，到很小的值，但是在看运行结果W时，W在119到5,60位时还是正常递减，再往前就出现了很大的值，还是逐渐递增，就是不知道问题出在哪，难道我的编译器有问题，求大神帮运行看一下啊，多谢 |
回复此楼» 猜你喜欢
不自信的我
已经有5人回复
-
磺酰氟产物，毕不了业了！
已经有4人回复
-
论文终于录用啦！满足毕业条件了
已经有16人回复
-
投稿Elsevier的杂志（返修），总是在选择OA和subscription界面被踢皮球
已经有8人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 关于Fortran程序运行的求助
已经有2人回复
- fortran程序运行黑框闪下就消失
已经有5人回复
- 【求助】运行fortran程序出现错误 : error LNK2019 怎么回事啊
已经有8人回复
- 【求助】请教如何在超算上运行fortran程序
已经有4人回复
- 【求助】fortran出错 编译通过 运行溢出
已经有10人回复
- 【求助】FORTRAN编译通过，但是运行不了
已经有19人回复
- 【求助】fortran程序未出错，但运行不出结果，中途中断！
已经有6人回复
- 【求助】此FORTRAN90程序没有错误，但是运行不出来。
已经有4人回复
- 【求助】Fortran程序，如何让exe文件可以单独运行？
已经有6人回复
