| 查看: 396 | 回复: 1 | |||
[交流]
【求助】FORTRAN 90程序问题2【已解决】 已有1人参与
|
|
PROGRAM rotate INTEGER,DIMENSION(1:3,1:3)::a INTEGER::i,j,temp,m a=RESHAPE((/11,22,33,44,55,66,77,88,99/),(/3,3/)) PRINT'(3I3)',((a(i,j),j=1,3),i=1,3) DO i=1,2 m=4 - i temp=a(m,3) a(m,3)=a(3,i); a(3,i)=a(i,1); a(i,1)=a(1,m) a(1,m)=temp END DO PRINT'(3I3)',((a(i,j),j=1,3),i=1,3) END PROGRAM rotate 此程序为什么第四行是77 88 99 第六行是11 22 33? [ Last edited by jjdg on 2010-4-22 at 21:00 ] |
» 猜你喜欢
“人文社科而论,许多学术研究还没有达到民国时期的水平”
已经有4人回复
过年走亲戚时感受到了所开私家车的鄙视链
已经有11人回复
什么是人一生最重要的?
已经有4人回复
版面费该交吗
已经有3人回复
今年春晚有几个节目很不错,点赞!
已经有12人回复
体制内长辈说体制内绝大部分一辈子在底层,如同你们一样大部分普通教师忙且收入低
已经有12人回复
基金正文30页指的是报告正文还是整个申请书
已经有5人回复
» 本主题相关价值贴推荐,对您同样有帮助:
Fortran 编译问题
已经有9人回复
allocate与data共存的问题
已经有14人回复
请教一个fortran小程序编译出错的问题,谢谢
已经有9人回复
【求助】Fortran语言赋值问题?
已经有3人回复
关于MPI并行编程的基本问题
已经有8人回复
有关fortran的一次而问题,希望大家能帮帮忙,谢谢
已经有4人回复
写了一个fortran90的小程序,编译通不过,请大侠帮忙
已经有59人回复
【求助】如何写FORTRAN程序实现求平均最近邻距离
已经有34人回复
【求助】f90子程序怎么编译错误?请大家帮忙,谢谢
已经有3人回复
【求助】Fortran编译目标文件后的链接问题
已经有4人回复
【求助】有很多错误的程序,找不出来了
已经有18人回复
【交流】Fortran语言答疑专帖
已经有157人回复


2楼2010-04-22 19:23:52













回复此楼