24小时热门版块排行榜

当前主题已经存档。

金虫 (小有名气)

[交流] 【求助】帮忙看下这个小程序【已完结】

说明：
txt里存有三个数：3，3，4，想读取之后显示在屏幕上，可是只能显示一个3，请大侠帮忙看下咋回事，谢谢

代码：
program main
  implicit none
  integer a
  open(3,file="E:\1.txt"

read(3,*)a
write(*,"(i3)"

a
end

[ Last edited by nono2009 on 2009-10-10 at 11:28 ]

为什么我的眼里满含泪水？因为我对这土地爱的深沉。

1楼 2009-10-10 10:30:54

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

荣誉版主 (职业作家)

★ ★
奥迪A6(金币+2,VIP+0):谢谢你给我灵感 10-10 10:49

fortran的这部分偶没弄过，

不过感觉应该是有个循环来读取，根据字符结束条件每次读取一个，
你这好像只读取了一次，是不是？
个人意见，仅供参考，期待高手

[center][url=http://www.91cool.net/][img]http://id.91cool.net/sign/?name=小木虫印&amp;amp;say=各位版主辛苦了！[/img][/url][/center]

2楼2009-10-10 10:38:49

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

金虫 (小有名气)

引用回帖:

Originally posted by woshilsh at 2009-10-10 10:38:
fortran的这部分偶没弄过，

不过感觉应该是有个循环来读取，根据字符结束条件每次读取一个，
你这好像只读取了一次，是不是？
个人意见，仅供参考，期待高手

我修改了下，成功了
program main
  implicit none
  integer a(3)
  integer i
  open(3,file="E:\1.txt"

  do i=1,3
  read(3,*)a(i)
  write(*,*)a(i)
  end do
end

为什么我的眼里满含泪水？因为我对这土地爱的深沉。

3楼2009-10-10 10:49:38

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

相关版块跳转我要订阅楼主奥迪A6 的主题更新