| 查看: 4382 | 回复: 9 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[求助]
exp中有循环变量，结果出现infinity，怎么处理
|
|||
|
输出结果为 <-infinity,infinity> <-infinity,infinity> <-infinity,infinity> …… …… 问题1：这怎么处理？ 问题2：结果为什么会有两列，而不是一列？ （初学FORTRAN，还请高手指教） 代码如下： program abc real bx(100),by(100) integer k,n complex i,q open(10,file='haha111.dat',status='unknown') i=(0,1) do 3 n=0,99 bx(n+1)=bx(n)+1 by(n+1)=by(n)+2 3 continue do 2 k=1,99 p=sqrt((sqrt(bx(k)**2+by(k)**2)-50/6.582122e-16)**2-by(k)**2) q=exp(i*2+p) write(*,*)q 2 continue close(10,status='keep') end |
回复此楼» 猜你喜欢
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有3人回复
-
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有3人回复
-
售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急
已经有3人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有3人回复
-
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有3人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有3人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有6人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有9人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有3人回复
-
考博求助
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- Matlab(或者Mathematica) 如何进行复杂函数的二重积分？
已经有6人回复
- 求带积分项（积分项除了积分变量还有一个符号常量）的非线性方程
已经有7人回复
jerkwin
专家顾问 (正式写手)
-
专家经验: +14 - 应助: 454 (硕士)
- 金币: 20659.1
- 散金: 148
- 红花: 81
- 帖子: 813
- 在线: 2648.7小时
- 虫号: 1023452
- 注册: 2010-05-19
- 专业: 理论和计算化学
- 管辖: 分子模拟
8楼2013-09-03 08:54:56
jerkwin
专家顾问 (正式写手)
-
专家经验: +14 - 应助: 454 (硕士)
- 金币: 20659.1
- 散金: 148
- 红花: 81
- 帖子: 813
- 在线: 2648.7小时
- 虫号: 1023452
- 注册: 2010-05-19
- 专业: 理论和计算化学
- 管辖: 分子模拟
2楼2013-09-03 07:03:11
3楼2013-09-03 08:29:39
bennett_14
木虫 (正式写手)
- 应助: 11 (小学生)
- 金币: 7204.8
- 红花: 4
- 沙发: 1
- 帖子: 932
- 在线: 421.5小时
- 虫号: 1073877
- 注册: 2010-08-13
- 性别: GG
- 专业: 计算机科学
4楼2013-09-03 08:31:18
