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

登录注册

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

24小时热门版块排行榜

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

返回列表

astringent

铜虫 (著名写手)

应助: 16 (小学生)
金币: 2210.7
散金: 1233
红花: 4
帖子: 1180
在线: 354.8小时
虫号: 900839
注册: 2009-11-12
专业: 理论和计算化学

[交流] 【求助】怎样使输出的结果不重复？？已有1人参与

我的想法是这样的，把符合条件(r.lt.rmax) 的io和r输出，但是在循环过程中会有重复的io出现，怎样才能使符合条件(r.lt.rmax) 的io只输出一次，并统计次数次数？请大家帮忙看看。
我的程序是这样的：
      do i=1, n1
         if (条件1) then
               io=i
                  do j=1,n2
                     call bondcalculation(io,j，r)
                        if (r.lt.rmax) then
                        nwat=nwat+1
                        write(10,*) io
                     endif
                  enddo
               endif
            enddo

回复此楼

» 猜你喜欢

315分 085602 求调剂已经有3人回复
求调剂，一志愿郑州大学材料与化工专硕，英二数二342分，求老师收留已经有4人回复
285求调剂已经有8人回复
324求调剂已经有8人回复
一志愿华南师范大学-22408计算机-292分-求华南师范大学调剂已经有4人回复
材料调剂已经有9人回复
321求调剂已经有12人回复
调剂求助已经有4人回复
22408 266求调剂已经有3人回复
266分，一志愿电气工程，本科材料，求材料专业调剂已经有4人回复

1楼 2011-01-19 04:40:39

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

zhai-lili

金虫 (正式写手)

应助: 3 (幼儿园)
金币: 1412.4
散金: 3
帖子: 390
在线: 131.2小时
虫号: 1126500
注册: 2010-10-19
专业: 植物化学保护

★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+1): 谢谢参与应助！ 2011-01-19 14:45:10

会有重复的io出现？
i=1
...
io=i
循环中没见你对io处理啊，io能不重复吗？

赞一下(2人)