| 查看: 4076 | 回复: 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 |
回复此楼» 猜你喜欢
面上本子正文33页，违规吗？会被低分嘛？
已经有10人回复
-
国自然上会要求
已经有9人回复
-
博士申请
已经有5人回复
-
评审有感
已经有6人回复
-
今年审到国自然15份，谈谈感受
已经有16人回复
-
上海大学实验技术岗位非升即走
已经有8人回复
-
考博自荐
已经有6人回复
-
青C资助名额大幅增加！
已经有16人回复
-
重磅！青年科学基金项目（C类）资助增幅预计超过50%
已经有10人回复
-
我在等一个没有答案的答案
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- Matlab(或者Mathematica) 如何进行复杂函数的二重积分？
已经有6人回复
- 求带积分项（积分项除了积分变量还有一个符号常量）的非线性方程
已经有7人回复
jerkwin
专家顾问 (正式写手)
-
专家经验: +14 - 应助: 454 (硕士)
- 金币: 20699.1
- 散金: 148
- 红花: 81
- 帖子: 813
- 在线: 2648.3小时
- 虫号: 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
jerkwin
专家顾问 (正式写手)
-
专家经验: +14 - 应助: 454 (硕士)
- 金币: 20699.1
- 散金: 148
- 红花: 81
- 帖子: 813
- 在线: 2648.3小时
- 虫号: 1023452
- 注册: 2010-05-19
- 专业: 理论和计算化学
- 管辖: 分子模拟
5楼2013-09-03 08:46:25
6楼2013-09-03 08:47:27
7楼2013-09-03 08:49:33
jerkwin
专家顾问 (正式写手)
-
专家经验: +14 - 应助: 454 (硕士)
- 金币: 20699.1
- 散金: 148
- 红花: 81
- 帖子: 813
- 在线: 2648.3小时
- 虫号: 1023452
- 注册: 2010-05-19
- 专业: 理论和计算化学
- 管辖: 分子模拟
8楼2013-09-03 08:54:56
9楼2013-09-03 09:07:44
10楼2013-09-03 10:56:08
20