PTT數位生活區 / Fortran

Re: [問題] 迴圈問題

看板Fortran作者 (寶貝)時間12年前 (2012/05/29 22:43), 編輯推噓4(4推 0噓 3→)
留言7則, 4人參與, 最新討論串4/4 (看更多)
program test integer:: i=7,j=15,m,n print '(<j>A,/,<i-2>(<j>A,/),<j>A)', ('*',n=1,j) , (('*', (' ' ,n=1,j-2),'*'),m=1,i-2) , ('*',n=1,j) pause end program test 中間print是一整行,free format適用 輸出檔案就改成write 更精簡的 print '(<j>A,/,<i-2>(1A,<j-2>X,1A,/),<j>A)', ('*',n=1,(i+j-2)*2) format挺好玩的 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.115.120.79
→
05/30 00:50, , 1F
感恩~讓我看到許多不同的方式
05/30 00:50, 1F
※ 編輯: onezillion 來自: 140.115.120.79 (05/30 01:38)
推
05/31 03:57, , 2F
開眼界了!! 厲害!!
05/31 03:57, 2F
推
06/02 11:36, , 3F
推！！可是看不懂Orz
06/02 11:36, 3F
→
06/02 22:30, , 4F
FORMATE 裡面的數字可以換成 <i>裡面接變數!!
06/02 22:30, 4F
→
06/02 22:31, , 5F
ex '(5F5.2)'>> i=5; '(<i>F5.2)';
06/02 22:31, 5F
推
06/05 11:59, , 6F
謝謝jubilee2~~學到了!!感謝!!
06/05 11:59, 6F
推
06/20 23:29, , 7F
原來有這招~
06/20 23:29, 7F
‣ 更多 onezillion 的文章
文章代碼(AID): #1FnE2INX (Fortran)
討論串 (同標題文章)
完整討論串 (本文為第 4 之 4 篇)：
排序： 最舊先 | 最新先 | 留言數
1
11
[問題] 迴圈問題
Wstyle
12年前, 05/28
在新視窗開啟完整討論串 (共4篇)
Fortran 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 onezillion 的文章
文章代碼(AID): #1FnE2INX (Fortran)