24小时热门版块排行榜    

查看: 1968  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

百里道

木虫 (初入文坛)

[求助] fortran 数组输出 已有2人参与

数组为2500*2500,
fortran每80个字符自动换行,一行只有四个数,想得到直观的2500*2500矩阵,就是一行2500个数,怎么实现?
网上只说了‘\’ 换行,‘advance=no'取消自动换行,请高人指导
回复此楼

» 猜你喜欢

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

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

btx97

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
百里道: 金币+9, ★★★很有帮助, 可以实现,只是我输出的实数看起来不是很整齐 2014-04-01 08:44:07
假设你的数组yourarray是整型且最多w-1位

write(*,'(2500(2500Iw, /))') yourarray
3楼2014-03-31 15:47:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

Carpathia

银虫 (小有名气)

【答案】应助回帖

感谢参与,应助指数 +1
write(11,'(E20.12,\)')mat1
write(11,'(E20.12)')mat2

这样写,mat1和mat2在一行里面
追求理想的道路上东张西望
2楼2014-03-31 15:36:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

百里道

木虫 (初入文坛)

引用回帖:
3楼: Originally posted by btx97 at 2014-03-31 15:47:19
假设你的数组yourarray是整型且最多w-1位

write(*,'(2500(2500Iw, /))') yourarray

感谢!
==
4楼2014-04-01 08:43:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 297求调剂 +11 戏精丹丹丹 2026-03-17 12/600 2026-03-21 17:47 by ColorlessPI
[考研] 初试 317 +5 半拉月丙 2026-03-20 5/250 2026-03-21 16:51 by 棒棒球手
[考研] 求助 +4 梦里的无言 2026-03-21 5/250 2026-03-21 15:53 by ColorlessPI
[考研] 268求调剂 +9 简单点0 2026-03-17 9/450 2026-03-21 15:37 by lature00
[考研] 南昌大学材料专硕311分求调剂 +6 77chaselx 2026-03-20 6/300 2026-03-21 07:24 by JourneyLucky
[考研] 070300化学319求调剂 +7 锦鲤0909 2026-03-17 7/350 2026-03-21 03:46 by JourneyLucky
[考研] 材料 336 求调剂 +3 An@. 2026-03-18 4/200 2026-03-21 01:39 by JourneyLucky
[考研] 一志愿华南师大 070300(化学)304分求调剂 +3 0703武芊慧雪304 2026-03-18 3/150 2026-03-21 00:48 by JourneyLucky
[考研] 材料专业求调剂 +6 hanamiko 2026-03-18 6/300 2026-03-21 00:24 by JourneyLucky
[考研] 药学383 求调剂 +3 药学chy 2026-03-15 5/250 2026-03-20 22:11 by 云游重阳
[考研] 一志愿苏州大学材料求调剂,总分315(英一) +5 sbdksD 2026-03-19 5/250 2026-03-20 22:10 by luoyongfeng
[考研] 中南大学化学学硕337求调剂 +3 niko- 2026-03-19 6/300 2026-03-20 21:58 by luoyongfeng
[考研] 一志愿西南交通 专硕 材料355 本科双非 求调剂 +5 西南交通专材355 2026-03-19 5/250 2026-03-20 21:10 by JourneyLucky
[考研] 295复试调剂 +8 简木ChuFront 2026-03-19 8/400 2026-03-20 20:44 by zhukairuo
[考研] 招收调剂硕士 +4 lidianxing 2026-03-19 12/600 2026-03-20 12:25 by lidianxing
[考博] 招收博士1-2人 +3 QGZDSYS 2026-03-18 3/150 2026-03-20 11:58 by 呱呱呱呱叫
[论文投稿] 申请回稿延期一个月,编辑同意了。但系统上的时间没变,给编辑又写邮件了,没回复 10+3 wangf9518 2026-03-17 4/200 2026-03-19 23:55 by babero
[考研] 一志愿985,本科211,0817化学工程与技术319求调剂 +10 Liwangman 2026-03-15 10/500 2026-03-19 10:25 by 无际的草原
[考研] 收复试调剂生 +4 雨后秋荷 2026-03-18 4/200 2026-03-18 14:16 by elevennnne
[考研] 308求调剂 +4 是Lupa啊 2026-03-16 4/200 2026-03-17 17:12 by ruiyingmiao
信息提示
请填处理意见