24小时热门版块排行榜

返回列表

astringent

铜虫 (著名写手)

应助: 16 (小学生)
金币: 2210.7
帖子: 1180
在线: 354.8小时
虫号: 900839

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

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

回复此楼

» 猜你喜欢

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

查看全部散金贴

1楼 2011-01-19 17:57:34

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

zhuwei04

木虫 (正式写手)

应助: 0 (幼儿园)
金币: 2536.5
帖子: 372
在线: 91.6小时
虫号: 162510

★ ★ ★
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)

赞一下(1人)

回复此楼

2楼2011-01-19 20:39:26

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

zhai-lili

金虫 (正式写手)

应助: 3 (幼儿园)
金币: 1412.4
帖子: 390
在线: 131.2小时
虫号: 1126500

★ ★
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 */
}
不过还是不明白这段你是想干什么。。。没有什么实际的意思啊

赞一下(1人)

回复此楼

3楼2011-01-20 11:19:32

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

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

返回列表

24小时热门版块排行榜

astringent

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

» 猜你喜欢

» 抢金币啦！回帖就可以得到: 查看全部散金贴

zhuwei04

zhai-lili

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

查看全部散金贴