24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 461  |  回复: 2

astringent

铜虫 (著名写手)


[交流] 【求助】这几行程序是什么意思啊

没接触过c语言,所以向大家求助,请问下面几行程序是什么意思啊?如果用fortran语言表示是什么意思:
if (r[0] > BOXLX) {
    r[0] -= BOXLX;
    ++kPBC[0];
  }
  else if (r[0] < -BOXLX) {
    r[0] += BOXLX;
    --kPBC[0];
  }
回复此楼

» 猜你喜欢

» 抢金币啦!回帖就可以得到:

查看全部散金贴

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

zhuwei04

木虫 (正式写手)


★ ★ ★
astringent(金币+10): 2011-01-19 23:23:49
余泽成(金币+3): 谢谢参与应助! 2011-01-21 13:33:25
Fortran:
if (r(0) > BOXLX)
    r(0) = r(0)-BOXLX
    kPBC(0)=kPBC(0)+1
else if (r(0) < -BOXLX)
    r(0) = r(0)+BOXLX
    kPBC(0)=kPBC(0)-1
  }
不过Fortran里面数组是由1开始编号的,所以应该都是r(1)、kPBC(1)
2楼2011-01-19 20:39:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhai-lili

金虫 (正式写手)


★ ★
astringent(金币+10): 2011-01-21 04:09:54
余泽成(金币+2): 欢迎常来程序语言版! 2011-01-21 13:33:39
没看出来这一段有啥实际的意义
字面意思无非是:
if (r[0] > BOXLX)  /*数组r的第一个元素 如果大于  BOXLX*/
{
    r[0] -= BOXLX; /*数组r的第一个元素 减去 BOXLX的值 */
    ++kPBC[0];     /*数组kPBC的第一个元素 累加1 */
}
else if (r[0] < -BOXLX) /*数组r的第一个元素 如果小于 -BOXLX*/
{
    r[0] += BOXLX;      /*数组r的第一个元素 加上 BOXLX的值 */
    --kPBC[0];          /*数组kPBC的第一个元素 减1 */
}
不过还是不明白这段你是想干什么。。。没有什么实际的意思啊
3楼2011-01-20 11:19:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 astringent 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 316求调剂 +12 舟自梗 2026-04-01 16/800 2026-04-02 17:33 by zzsw+
[考研] 26考研调剂 +4 Wnz.20030617 2026-04-01 5/250 2026-04-02 16:11 by 1939136013狗壮
[考研] 一志愿厦门大学材料工程专硕354找调剂!!! +7 贝呗钡钡 2026-03-30 7/350 2026-04-02 12:19 by 1753564080
[考研] 一志愿北交大材料工程总分358 +3 cs0106 2026-04-02 5/250 2026-04-02 11:37 by olim
[考研] 一志愿北交大材料工程总分358 +8 cs0106 2026-04-01 9/450 2026-04-02 10:36 by 不吃魚的貓
[考研] 07生物学求调剂 一志愿同济大学359分 +3 LAMC. 2026-03-30 3/150 2026-04-02 10:26 by 18828373951
[考研] 270调剂 +7 maxjxbsk 2026-04-02 7/350 2026-04-02 09:50 by yulian1987
[考研] 348环境工程调剂 +3 吴彦祖24k 2026-04-01 3/150 2026-04-02 09:14 by nanaliuyun
[考研] 生物学327,求调剂 +5 书上的梅子 2026-04-01 6/300 2026-04-02 06:47 by ilovexiaobin
[考研] 279求调剂 +7 莫xiao 2026-04-01 7/350 2026-04-01 22:05 by 客尔美德
[考研] 江苏科技大学招材料研究生 +4 Su032713. 2026-04-01 5/250 2026-04-01 22:03 by cccchenso
[考研] 食品学硕362求调剂 +3 xuanxianxian 2026-04-01 3/150 2026-04-01 21:05 by 啊李999
[考研] 0703一志愿南师大334求调剂 +4 seven7yu 2026-03-30 4/200 2026-04-01 16:10 by oooqiao
[考研] 333求调剂 +4 阿科逸 2026-03-31 4/200 2026-04-01 09:11 by jp9609
[考研] 求调剂:085600材料与化工,考材科基,总分319 +17 678lucky 2026-03-31 21/1050 2026-04-01 01:40 by 1018329917
[考研] 求调剂 生物学 377分 +6 zzll03 2026-03-31 6/300 2026-03-31 17:33 by 唐沐儿
[考研] 江苏苏北高校诚邀调剂同学 +3 zzll406 2026-03-31 3/150 2026-03-31 16:54 by 及时行乐fan
[考研] 289求调剂 +3 Acesczlo 2026-03-29 4/200 2026-03-31 14:48 by 热情沙漠
[考研] 308求调剂 +7 墨墨漠 2026-03-27 7/350 2026-03-28 07:43 by 热情沙漠
[考研] 352分 化工与材料 +5 海纳百川Ly 2026-03-27 5/250 2026-03-28 03:39 by fmesaito
信息提示
请填处理意见