版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

北京石油化工学院2026年研究生招生接收调剂公告

返回列表

mercury1204

木虫 (正式写手)

应助: 0 (幼儿园)
金币: 14241.3
红花: 1
帖子: 604
在线: 33.4小时
虫号: 1167279
注册: 2010-12-11
专业: 金属材料的凝固与结晶学

[求助] 将一个VC语句转化为Fortran语句已有1人参与

A是一个三维的数组。
double *A=new double[a*a*p];
double *temp1=new double[a*a];
定义A,emp1是指针，m取值在0到p之间
VC语句
temp1[x*a+y]=A[x*a*p+y*p+m]
请问上面的语句在Fortran中如何实现？
非常感谢

回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:

急：求用Fortran或者其他语言编写一个程序，处理下面的数据！！！！！！！！！！已经有37人回复
fortran程序运行结果输出及绘图已经有9人回复
fortran编译中$符号的使用已经有4人回复
编一个fortran程序已经有17人回复
关于fortran子程序调用内部函数已经有7人回复
求助：intel visual fortran的格式问题已经有14人回复
大家都用什么fortran编辑器，推荐一下，最好是能加亮或修改语句颜色的已经有15人回复
C语言与Fortran语言之间的转化已经有9人回复
有没有人关注fortran语言的GPU并行呢？已经有12人回复
【分享】Fortran语言简介与Fortran语句功能分析（PPT) 已经有147人回复
【求助】如何写FORTRAN程序实现求平均最近邻距离已经有34人回复
【转帖】intel Fortran编译器的一个“危险”优化已经有9人回复
【交流】Fortran语言答疑专帖已经有157人回复

1楼 2014-12-11 21:48:03

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

linrn

至尊木虫 (著名写手)

应助: 26 (小学生)
金币: 15056.6
散金: 5
红花: 2
帖子: 2171
在线: 283.3小时
虫号: 492936
注册: 2008-01-09
性别: GG
专业: 固体力学

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与，应助指数 +1
mercury1204: 金币+10, ★★★★★最佳答案 2014-12-13 11:43:24

程序如下：
!数组定义
!fortran定义在1~n上
real(kind=8),allocatable::A(a+1,a+1,p+1),temp1(a+1,a+1)

!分配区间
allocate(A(a+1,a+1,p+1))
allocate(temp1(a+1,a+1))

!其他处理

!赋值
temp1((x+1)*(a+1)+y+1)=A((x+1)*(a+1)*(p+1)+(y+1)*(p+1)+m+1)

赞一下(1人)